--- a/PerforceSourceCodeManagementSettingsAppl.st	Tue Jul 24 18:17:26 2012 +0100
+++ b/PerforceSourceCodeManagementSettingsAppl.st	Wed Jul 25 10:51:30 2012 +0100
@@ -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,13 +1333,13 @@
 !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
-    ^ '$Id: PerforceSourceCodeManagementSettingsAppl.st 8007 2012-06-05 14:49:00Z vranyj1 $'
+    ^ '$Id: PerforceSourceCodeManagementSettingsAppl.st 8022 2012-07-25 09:51:30Z vranyj1 $'
 ! !