GitSourceCodeManager.st
changeset 2787 19b0b0144157
parent 2778 2aca22a7fff3
child 2789 f671169563e7
equal deleted inserted replaced
2786:31a32b5055f8 2787:19b0b0144157
   109 
   109 
   110 initializeForRepository:aDirectoryName
   110 initializeForRepository:aDirectoryName
   111     "reinitialize. 
   111     "reinitialize. 
   112      Can be used from the launcher to change/configure the repository."
   112      Can be used from the launcher to change/configure the repository."
   113 
   113 
       
   114     |dir|
       
   115 
   114     self repositoryName:aDirectoryName.
   116     self repositoryName:aDirectoryName.
   115     AbstractSourceCodeManager initialize.
   117     AbstractSourceCodeManager initialize.
   116     GitSourceCodeManager initialize.
   118     GitSourceCodeManager initialize.
   117 
   119 
       
   120     (dir := aDirectoryName asFilename) exists ifFalse:[
       
   121         dir recursiveMakeDirectory.
       
   122     ].
       
   123     (dir construct:'.git') exists ifFalse:[
       
   124         OperatingSystem executeCommand:'git init' inDirectory:dir pathName
       
   125     ].
       
   126 
   118     "Created: / 13-08-1997 / 17:20:57 / cg"
   127     "Created: / 13-08-1997 / 17:20:57 / cg"
   119     "Modified: / 25-09-1997 / 12:28:05 / stefan"
   128     "Modified: / 25-09-1997 / 12:28:05 / stefan"
   120     "Modified: / 02-03-2012 / 15:17:10 / cg"
   129     "Modified: / 02-03-2012 / 17:02:22 / cg"
       
   130 !
       
   131 
       
   132 initializeRepository
       
   133     self initializeForRepository:(self repositoryName)
       
   134 
       
   135     "Created: / 02-03-2012 / 16:56:21 / cg"
   121 ! !
   136 ! !
   122 
   137 
   123 !GitSourceCodeManager class methodsFor:'accessing'!
   138 !GitSourceCodeManager class methodsFor:'accessing'!
   124 
   139 
   125 gitBinDirectory:ignoredString 
   140 gitBinDirectory:ignoredString 
   395 ! !
   410 ! !
   396 
   411 
   397 !GitSourceCodeManager class methodsFor:'documentation'!
   412 !GitSourceCodeManager class methodsFor:'documentation'!
   398 
   413 
   399 version
   414 version
   400     ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.1 2012-03-02 14:28:01 cg Exp $'
   415     ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.2 2012-03-02 16:10:51 cg Exp $'
   401 !
   416 !
   402 
   417 
   403 version_CVS
   418 version_CVS
   404     ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.1 2012-03-02 14:28:01 cg Exp $'
   419     ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.2 2012-03-02 16:10:51 cg Exp $'
   405 ! !
   420 ! !
   406 
   421 
   407 GitSourceCodeManager initialize!
   422 GitSourceCodeManager initialize!