--- a/AbstractLauncherApplication.st Tue Aug 15 16:50:59 2000 +0200
+++ b/AbstractLauncherApplication.st Tue Aug 15 16:53:34 2000 +0200
@@ -3964,7 +3964,7 @@
|box resources currentUserPrefs in acceptChannel
useNewInspector useNewChangesBrowser useNewSystemBrowser useNewVersionDiffBrowser
- showClockInLauncher showClock launcher transcriptBufferSize|
+ showClockInLauncher showClock launcher transcriptBufferSize useNew|
currentUserPrefs := UserPreferences current.
@@ -4024,7 +4024,12 @@
currentUserPrefs useNewInspector:useNewInspector value.
currentUserPrefs useNewChangesBrowser:useNewChangesBrowser value.
- currentUserPrefs useNewSystemBrowser:useNewSystemBrowser value.
+ currentUserPrefs useNewSystemBrowser:(useNew := useNewSystemBrowser value).
+ useNew ifTrue:[
+ NewSystemBrowser isLoaded ifFalse:[
+ NewSystemBrowser autoload
+ ]
+ ].
currentUserPrefs useNewVersionDiffBrowser:useNewVersionDiffBrowser value.
showClock := showClockInLauncher value.
@@ -5501,5 +5506,5 @@
!AbstractLauncherApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.106 2000-08-15 14:12:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.107 2000-08-15 14:53:34 cg Exp $'
! !