--- a/GitSourceCodeManager.st	Fri Feb 24 11:40:05 2017 +0100
+++ b/GitSourceCodeManager.st	Fri Feb 24 11:40:08 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2012 by Claus Gittinger
               All Rights Reserved
@@ -381,19 +379,20 @@
     "Created: / 25-07-2012 / 23:07:57 / cg"
 !
 
-checkForExistingContainer:fileName inModule:moduleName directory:dirName
-    "check for a container to be present"
+checkForExistingContainer:fileName inModule:moduleName directory:packageDirName
+    "check for a container to exist. Return a boolean result."
 
     |path subDir|
 
-    path := (self repositoryName asFilename construct:moduleName) construct:dirName.
+    path := (self repositoryName asFilename construct:moduleName) construct:packageDirName.
     path exists ifFalse:[
-        subDir := moduleName asFilename construct:dirName.
+        subDir := moduleName asFilename construct:packageDirName.
         self executeGitCommand:'checkout ',subDir name inDirectory:self repositoryName.
     ].
     ^ (path construct:fileName) exists
 
     "Created: / 23-07-2012 / 16:21:02 / cg"
+    "Modified (format): / 24-02-2017 / 11:32:22 / cg"
 !
 
 checkForExistingModule:moduleName