--- a/FileBasedSourceCodeManagementSettingsAppl.st Fri Mar 02 14:51:11 2012 +0100
+++ b/FileBasedSourceCodeManagementSettingsAppl.st Fri Mar 02 14:51:15 2012 +0100
@@ -12,8 +12,8 @@
"{ Package: 'stx:libtool' }"
AbstractSourceCodeManagementSettingsAppl subclass:#FileBasedSourceCodeManagementSettingsAppl
- instanceVariableNames:'listOfModules removeEnabled pathPerModule repositoryPathHolder
- perModulePath perModulePathModule selectedPerModulePath'
+ instanceVariableNames:'pathPerModule repositoryPathHolder perModulePath
+ perModulePathModule selectedPerModulePath'
classVariableNames:'RecentlyUsedCVSRoots RecentlyUsedStoreHosts
RecentlyUsedSmallTeamHosts LastStoreHost LastStoreUser
LastStorePassword'
@@ -452,19 +452,6 @@
"Modified: / 10-01-2012 / 00:21:49 / cg"
!
-condenseSourceCache
- self withWaitCursorDo:[ AbstractSourceCodeManager condenseSourceCache ].
- Method flushSourceStreamCache.
-
- "Modified: / 28-11-2006 / 12:21:33 / cg"
-!
-
-flushSourceCache
- self withWaitCursorDo:[ AbstractSourceCodeManager flushSourceCache ].
-
- "Modified: / 30-09-2011 / 13:33:47 / cg"
-!
-
removePerModulePath
|module|
@@ -482,18 +469,10 @@
!FileBasedSourceCodeManagementSettingsAppl methodsFor:'aspects'!
-listOfModules
+initialListOfModules
+ ^ pathPerModule keys asList sort
- listOfModules isNil ifTrue:[
- pathPerModule notNil ifTrue:[
- listOfModules := pathPerModule keys asList.
- ].
- listOfModules sort.
- listOfModules onChangeSend:#updateModifiedChannel to:self
- ].
- ^ listOfModules.
-
- "Modified: / 21-12-2011 / 14:32:59 / cg"
+ "Created: / 02-03-2012 / 14:40:32 / cg"
!
pathPrototypeList
@@ -523,14 +502,6 @@
"Created: / 21-12-2011 / 14:31:09 / cg"
!
-removeEnabled
-
- removeEnabled isNil ifTrue:[
- removeEnabled := false asValue.
- ].
- ^ removeEnabled.
-!
-
repositoryPathHolder
repositoryPathHolder isNil ifTrue:[
repositoryPathHolder := FileBasedSourceCodeManager defaultRepositoryPath asValue.
@@ -704,9 +675,9 @@
!FileBasedSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.10 2012-03-02 09:49:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.11 2012-03-02 13:51:15 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.10 2012-03-02 09:49:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.11 2012-03-02 13:51:15 cg Exp $'
! !