--- a/CVSSourceCodeManager.st	Fri Oct 06 16:23:39 2006 +0200
+++ b/CVSSourceCodeManager.st	Fri Oct 06 17:08:36 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic3' }"
 
 AbstractSourceCodeManager subclass:#CVSSourceCodeManager
@@ -3261,8 +3260,8 @@
     idx := packageDirName lastIndexOf:$/.
     idx ~~ 0 ifTrue:[
         parentPackage := packageDirName copyTo:idx-1.
-        (self checkForExistingModule:moduleDirName package:parentPackage) ifFalse:[
-            (self createModule:moduleDirName package:parentPackage) ifFalse:[
+        (self checkForExistingModule:moduleDirName directory:parentPackage) ifFalse:[
+            (self createModule:moduleDirName directory:parentPackage) ifFalse:[
                 ^ false.
             ].
         ].
@@ -3334,7 +3333,7 @@
 
     "Modified: / 23-07-1999 / 18:40:49 / stefan"
     "Created: / 23-08-2006 / 14:04:39 / cg"
-    "Modified: / 29-08-2006 / 13:17:43 / cg"
+    "Modified: / 06-10-2006 / 17:08:15 / cg"
 !
 
 deleteSymbolicName:symbolicName path:pathInRepository
@@ -4378,7 +4377,7 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.332 2006-09-29 14:47:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.333 2006-10-06 15:08:36 cg Exp $'
 ! !
 
 CVSSourceCodeManager initialize!