--- a/NewLauncher.st	Tue Nov 11 17:08:51 2014 +0100
+++ b/NewLauncher.st	Tue Nov 11 17:10:04 2014 +0100
@@ -4927,6 +4927,8 @@
                         label:path last.
                 p add:i.
                 itemsByPath at:path put:i.
+                packageID := path first , ':' , ((path copyFrom:2) asStringWith:$/).
+                packageIdByItem at:i put:packageID.
             ].
             i
         ].
@@ -4954,7 +4956,6 @@
                 item icon:greyPackageIcon. 
                 item label:(item label , ' (already loaded)' asText allItalic)
             ].
-            packageIdByItem at:item put:packageID.
         ].
     ].
 
@@ -5226,14 +5227,14 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.500 2014-11-11 16:08:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.501 2014-11-11 16:10:04 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.500 2014-11-11 16:08:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.501 2014-11-11 16:10:04 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: NewLauncher.st,v 1.500 2014-11-11 16:08:51 cg Exp $'
+    ^ '$Id: NewLauncher.st,v 1.501 2014-11-11 16:10:04 cg Exp $'
 ! !