--- a/AbstractSourceCodeManager.st	Thu Nov 13 13:57:16 2003 +0100
+++ b/AbstractSourceCodeManager.st	Fri Nov 14 13:28:04 2003 +0100
@@ -700,7 +700,7 @@
     containerPath isNil ifTrue:[^ nil].
 
     packageID notNil ifTrue:[
-        idx := containerPath indexOfSubCollection:(packageID copyReplaceAll:$: with:$/).
+        idx := containerPath lastIndexOfSubCollection:(packageID copyReplaceAll:$: with:$/).
         idx ~~ 0 ifTrue:[
             ^ containerPath copyFrom:idx.
         ].
@@ -2107,7 +2107,7 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.165 2003-11-13 11:29:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.166 2003-11-14 12:28:04 cg Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!