added: #isGit
authorClaus Gittinger <cg@exept.de>
Fri, 02 Mar 2012 17:10:59 +0100
changeset 2788 99dd9025c611
parent 2787 19b0b0144157
child 2789 f671169563e7
added: #isGit
AbstractSourceCodeManager.st
--- a/AbstractSourceCodeManager.st	Fri Mar 02 17:10:51 2012 +0100
+++ b/AbstractSourceCodeManager.st	Fri Mar 02 17:10:59 2012 +0100
@@ -82,9 +82,11 @@
 
     CachingSources isNil ifTrue:[CachingSources := false].
     UseWorkTree    isNil ifTrue:[UseWorkTree := false].
-    self initCacheDirPath.
-
-    "Modified: / 20-01-2012 / 16:48:26 / cg"
+    CacheDirectoryName isNil ifTrue:[
+        self initCacheDirPath.
+    ].
+
+    "Modified: / 02-03-2012 / 17:00:11 / cg"
 ! !
 
 !AbstractSourceCodeManager class methodsFor:'accessing'!
@@ -3544,11 +3546,11 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.289 2012-03-02 15:44:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.290 2012-03-02 16:10:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.289 2012-03-02 15:44:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.290 2012-03-02 16:10:59 cg Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!