--- 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!