changed:
authorClaus Gittinger <cg@exept.de>
Wed, 19 Oct 2011 16:49:32 +0200
changeset 2603 522db5b81315
parent 2602 a8fcee161334
child 2604 e0743b3ba275
changed: #managerForModule: #managerForPackage:
AbstractSourceCodeManager.st
--- a/AbstractSourceCodeManager.st	Sun Oct 16 00:23:36 2011 +0200
+++ b/AbstractSourceCodeManager.st	Wed Oct 19 16:49:32 2011 +0200
@@ -190,7 +190,7 @@
     self managerPerMatchingModuleDefinitions do:[:each |
         (each match:aPackageID) ifTrue:[^ each manager].
     ].
-    ^ nil
+    ^ DefaultManager
 
     "
      self managerForModule:'stx:libbasic' 
@@ -200,6 +200,7 @@
 
     "Created: / 18-04-2011 / 19:39:19 / cg"
     "Modified (comment): / 10-10-2011 / 14:51:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 19-10-2011 / 16:45:50 / cg"
 !
 
 managerForPackage:aPackageID
@@ -208,7 +209,7 @@
     self managerPerMatchingModuleDefinitions do:[:each |
         (each match:aPackageID) ifTrue:[^ each manager].
     ].
-    ^ nil
+    ^ DefaultManager
 
     "
      self managerForModule:'stx:libbasic' 
@@ -219,6 +220,7 @@
     "Created: / 18-04-2011 / 19:39:19 / cg"
     "Modified: / 09-07-2011 / 15:09:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Created: / 10-10-2011 / 14:50:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 19-10-2011 / 16:45:38 / cg"
 !
 
 managerPerMatchingModuleDefinitions
@@ -2094,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.268 2011-10-15 15:23:50 vrany Exp $'
+    "/is fresh, like '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.269 2011-10-19 14:49:32 cg Exp $'
     (doubleColon == 0 or:[doubleColon > endQuote]) ifTrue:[
         doubleColon := endQuote - 1.
     ].
@@ -3301,11 +3303,11 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.268 2011-10-15 15:23:50 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.269 2011-10-19 14:49:32 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.268 2011-10-15 15:23:50 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.269 2011-10-19 14:49:32 cg Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!