--- a/AbstractSourceCodeManager.st	Mon Oct 31 11:47:07 2011 +0100
+++ b/AbstractSourceCodeManager.st	Fri Nov 18 14:08:02 2011 +0100
@@ -2096,7 +2096,7 @@
 
     doubleColon := source indexOf: $: startingAt: startQuote + 2.
     "/There may be no double colon at all, if the version method
-    "/is fresh, like '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.269 2011-10-19 14:49:32 cg Exp $'
+    "/is fresh, like '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.270 2011-11-18 13:08:02 cg Exp $'
     (doubleColon == 0 or:[doubleColon > endQuote]) ifTrue:[
         doubleColon := endQuote - 1.
     ].
@@ -3283,12 +3283,12 @@
 !AbstractSourceCodeManager::PackageAndManager methodsFor:'queries'!
 
 match: packageId
-
     | manager |
+
     manager := self manager.
-    manager ifNil:[^false].
-
-    ^(package match: packageId) 
+    manager isNil ifTrue:[^false].
+
+    ^ (package match: packageId) 
         and: [manager isResponsibleForPackage: packageId]
 
     "
@@ -3298,16 +3298,17 @@
     "
 
     "Created: / 09-07-2011 / 14:26:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 18-11-2011 / 14:07:53 / cg"
 ! !
 
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.269 2011-10-19 14:49:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.270 2011-11-18 13:08:02 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.269 2011-10-19 14:49:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.270 2011-11-18 13:08:02 cg Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!