#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Fri, 18 Nov 2016 15:58:38 +0100
changeset 4138 4e6d223eb117
parent 4137 c0d64b4ef710
child 4139 cc16c864a5f6
#BUGFIX by cg class: FileBasedSourceCodeManager changed: #checkinClass:fileName:directory:module:source:logMessage:force:
FileBasedSourceCodeManager.st
--- a/FileBasedSourceCodeManager.st	Fri Nov 18 15:58:26 2016 +0100
+++ b/FileBasedSourceCodeManager.st	Fri Nov 18 15:58:38 2016 +0100
@@ -237,7 +237,9 @@
     |targetDir newestRevision newRevision newFile packageMode filter outStream|
 
     targetDir := self packageDirectoryForModule:moduleDir package:packageDir.
-
+    targetDir exists ifFalse:[
+        targetDir recursiveMakeDirectory
+    ].
     (targetDir filesMatching:(classFileName,'_*')) do:[:eachVersionFile |
         |versionString|