GitSourceCodeManager.st
changeset 2787 19b0b0144157
parent 2778 2aca22a7fff3
child 2789 f671169563e7
--- a/GitSourceCodeManager.st	Fri Mar 02 16:44:10 2012 +0100
+++ b/GitSourceCodeManager.st	Fri Mar 02 17:10:51 2012 +0100
@@ -111,13 +111,28 @@
     "reinitialize. 
      Can be used from the launcher to change/configure the repository."
 
+    |dir|
+
     self repositoryName:aDirectoryName.
     AbstractSourceCodeManager initialize.
     GitSourceCodeManager initialize.
 
+    (dir := aDirectoryName asFilename) exists ifFalse:[
+        dir recursiveMakeDirectory.
+    ].
+    (dir construct:'.git') exists ifFalse:[
+        OperatingSystem executeCommand:'git init' inDirectory:dir pathName
+    ].
+
     "Created: / 13-08-1997 / 17:20:57 / cg"
     "Modified: / 25-09-1997 / 12:28:05 / stefan"
-    "Modified: / 02-03-2012 / 15:17:10 / cg"
+    "Modified: / 02-03-2012 / 17:02:22 / cg"
+!
+
+initializeRepository
+    self initializeForRepository:(self repositoryName)
+
+    "Created: / 02-03-2012 / 16:56:21 / cg"
 ! !
 
 !GitSourceCodeManager class methodsFor:'accessing'!
@@ -397,11 +412,11 @@
 !GitSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.1 2012-03-02 14:28:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.2 2012-03-02 16:10:51 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.1 2012-03-02 14:28:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.2 2012-03-02 16:10:51 cg Exp $'
 ! !
 
 GitSourceCodeManager initialize!