--- a/AbstractLauncherApplication.st Thu Nov 05 20:28:42 2009 +0100
+++ b/AbstractLauncherApplication.st Thu Nov 05 20:29:04 2009 +0100
@@ -248,6 +248,7 @@
].
].
SettingsList := settingsList.
+ ^ settingsList.
"
self withAllSubclassesDo:[:cls | cls initializeSettingsList ]
@@ -281,8 +282,11 @@
!
settingsList
-
- SettingsList isNil ifTrue: [self initializeSettingsList].
+ "/ do NOT cache
+ SettingsList := nil.
+ SettingsList isNil ifTrue: [
+ SettingsList := self initializeSettingsList
+ ].
^ SettingsList
! !
@@ -6720,9 +6724,9 @@
!AbstractLauncherApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.386 2009-11-02 17:02:10 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.387 2009-11-05 19:29:04 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.386 2009-11-02 17:02:10 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.387 2009-11-05 19:29:04 cg Exp $'
! !