--- a/MercurialSourceCodeManagementSettingsAppl.st Fri Mar 02 14:51:18 2012 +0100
+++ b/MercurialSourceCodeManagementSettingsAppl.st Fri Mar 02 14:51:23 2012 +0100
@@ -12,12 +12,12 @@
"{ Package: 'stx:libtool' }"
AbstractSourceCodeManagementSettingsAppl subclass:#MercurialSourceCodeManagementSettingsAppl
- instanceVariableNames:'repositoryHolder manager repository listOfModules
- repositoryPrototypeList addPerModuleRepository removeEnabled
- removePerModuleRepository perModuleRepository
- defaultRepositoryHolder selectedPerModuleRepository
- hgBinDirectoryHolder hgExecutableHolder hgCommandTimeoutHolder
- repositoriesPerModule perModuleRepositoryModule'
+ instanceVariableNames:'repositoryHolder manager repository repositoryPrototypeList
+ addPerModuleRepository removePerModuleRepository
+ perModuleRepository defaultRepositoryHolder
+ selectedPerModuleRepository hgBinDirectoryHolder
+ hgExecutableHolder hgCommandTimeoutHolder repositoriesPerModule
+ perModuleRepositoryModule'
classVariableNames:'RecentlyUsedRepositoryURLS'
poolDictionaries:''
category:'System-SourceCodeManagement'
@@ -951,18 +951,10 @@
"Created: / 14-01-2012 / 20:02:22 / cg"
!
-listOfModules
+initialListOfModules
+ ^ repositoriesPerModule keys asList sort.
- listOfModules isNil ifTrue:[
- repositoriesPerModule notNil ifTrue:[
- listOfModules := repositoriesPerModule keys asList.
- ].
- listOfModules sort.
- listOfModules onChangeSend:#updateModifiedChannel to:self
- ].
- ^ listOfModules.
-
- "Modified: / 14-01-2012 / 20:18:34 / cg"
+ "Created: / 02-03-2012 / 14:41:07 / cg"
!
perModuleRepository
@@ -984,14 +976,6 @@
"Created: / 14-01-2012 / 20:19:51 / cg"
!
-removeEnabled
-
- removeEnabled isNil ifTrue:[
- removeEnabled := false asValue.
- ].
- ^ removeEnabled.
-!
-
repositoryHolder
repositoryHolder isNil ifTrue:[
@@ -1221,9 +1205,9 @@
!MercurialSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.8 2012-03-02 09:50:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.9 2012-03-02 13:51:23 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.8 2012-03-02 09:50:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.9 2012-03-02 13:51:23 cg Exp $'
! !