--- a/SettingsDialog.st	Tue Mar 02 17:27:45 2004 +0100
+++ b/SettingsDialog.st	Tue Mar 02 17:28:20 2004 +0100
@@ -1176,7 +1176,7 @@
     "a temporary kludge - we need a central systemSettings object for this,
      which can be saved/restored with a single store/read."
 
-    |fileName|
+    |fileName transcript launcher|
 
     fileName := Dialog 
         requestFileName:(resources string:'Load Settings from File') 
@@ -1193,7 +1193,16 @@
 
     self withWaitCursorDo:[
         Smalltalk fileIn:fileName.
-        Transcript current topView model reOpen.
+
+        "/ Transcript current topView model reOpen.
+
+        transcript := Transcript current.
+        (transcript notNil and:[transcript isExternalStream not]) ifTrue:[
+            launcher := transcript application.
+            launcher notNil ifTrue:[
+                launcher reopenLauncher.
+            ]
+        ].
         self sendLoadRequestToAll.
     ].
 !
@@ -1296,7 +1305,7 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.49 2004-03-02 12:46:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.50 2004-03-02 16:28:12 cg Exp $'
 ! !
 
 SettingsDialog initialize!