--- a/PerforceSourceCodeManagementSettingsAppl.st	Thu Jul 19 17:19:59 2012 +0200
+++ b/PerforceSourceCodeManagementSettingsAppl.st	Thu Jul 19 17:27:52 2012 +0200
@@ -815,40 +815,7 @@
     self removeEnabled value:self selectedPerModuleRoot value notNil.
 !
 
-sourceDirChanged
-    | nm fn|
-
-    nm := self sourceCacheDir value.
-    nm isEmptyOrNil ifTrue:[^ self].
-
-    (fn := nm asFilename) exists ifFalse:[
-        (self confirm:('SourceCache directory ''' , nm , ''' does not exist.\Create ?' withCRs)) ifTrue:[
-            fn makeDirectory;
-               makeReadableForAll;
-               makeWritableForAll;
-               makeExecutableForAll.
-        ] ifFalse:[
-            self sourceCacheDir value:(AbstractSourceCodeManager cacheDirectoryName).
-            ^ self.
-        ].
-    ].
-    (fn isDirectory
-    and:[fn isReadable
-    and:[fn isWritable]]) ifTrue:[
-        AbstractSourceCodeManager cacheDirectoryName:nm.
-    ] ifFalse:[
-        self warn:'Invalid sourceCache directory.'.
-        self sourceCacheDir value:(AbstractSourceCodeManager cacheDirectoryName).
-    ].
-!
-
 update:something with:aParameter from:changedObject
-    "/ common
-    changedObject == sourceCacheDir ifTrue:[
-        self sourceDirChanged.
-        self updateModifiedChannel.
-        ^ self
-    ].
 
     changedObject == selectedPerModuleRoot ifTrue:[
         self selectedPerModuleRootChanged.
@@ -1366,11 +1333,11 @@
 !PerforceSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagementSettingsAppl.st,v 1.24 2012-06-01 22:21:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagementSettingsAppl.st,v 1.25 2012-07-19 15:27:52 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagementSettingsAppl.st,v 1.24 2012-06-01 22:21:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagementSettingsAppl.st,v 1.25 2012-07-19 15:27:52 stefan Exp $'
 !
 
 version_SVN