Index: tolbase/lib/toltk/tolpkg.tcl
===================================================================
--- tolbase/lib/toltk/tolpkg.tcl	(revision 9b614daf93ac825703b1f4ef2f169080f82a738b)
+++ tolbase/lib/toltk/tolpkg.tcl	(revision bc8a9f972724ea27e2797e9debd1257c5567dbcb)
@@ -149,5 +149,8 @@
   set pkgsInfo {}
   foreach d $dirs {
-    lappend pkgsInfo [ list $d [ GetLocalPackageInfo $d ] ]
+    set pkgInfo [ GetLocalPackageInfo $d ]
+    if { [llength $pkgInfo] > 0 } {
+      lappend pkgsInfo [ list $d $pkgInfo ]
+    }
   }
   return $pkgsInfo
@@ -156,5 +159,5 @@
 proc ::TolPkg::GetLocalPackageInfo { p } {
   set tolScript [ string map [ list %p $p ] {
-    Set TolPackage::Client::GetPackageInfo( "%p" );
+    Set TolPackage::Client::GetPackageInfo_Compatible( "%p" );
   } ]
   return [ lindex [ toltcl::eval $tolScript -named 1 ] 1 ]
Index: tolbase/lib/toltk/tolpkg_gui.tcl
===================================================================
--- tolbase/lib/toltk/tolpkg_gui.tcl	(revision 9b614daf93ac825703b1f4ef2f169080f82a738b)
+++ tolbase/lib/toltk/tolpkg_gui.tcl	(revision bc8a9f972724ea27e2797e9debd1257c5567dbcb)
@@ -778,5 +778,6 @@
     array unset pkg
     array set pkg $localVersionInfo($pv)
-    set pkgRoot [ lindex [ split $pv . ] 0 ]
+    set pkgRoot0 [ lindex [ split $pv . ] 0 ]
+    set pkgRoot [ lindex [ split $pkgRoot0 # ] 0 ]
     set url $pkg(_.autodoc.url)
     set pkgRepo [ expr { [ string range $url end-13 end ] eq "repository.php" ?