Launcher.st
changeset 1199 a348a5f71105
parent 1198 8993be232b10
child 1220 552a2ab14c0a
--- a/Launcher.st	Tue Jun 24 10:05:13 1997 +0200
+++ b/Launcher.st	Tue Jun 24 16:49:29 1997 +0200
@@ -11,11 +11,11 @@
 "
 
 ApplicationModel subclass:#Launcher
-        instanceVariableNames:'myMenu buttonPanel transcript infoView infoProcess helpIsOn
-                isMainLauncher'
-        classVariableNames:'CachedAboutIcon OpenLaunchers NotifyingEmergencyHandler'
-        poolDictionaries:''
-        category:'Interface-Smalltalk'
+	instanceVariableNames:'myMenu buttonPanel transcript infoView infoProcess helpIsOn
+		isMainLauncher'
+	classVariableNames:'CachedAboutIcon OpenLaunchers NotifyingEmergencyHandler'
+	poolDictionaries:''
+	category:'Interface-Smalltalk'
 !
 
 !Launcher class methodsFor:'documentation'!
@@ -1828,6 +1828,7 @@
         ].
         switch ifTrue:[
             self reopenLauncher.
+            DebugView newDebugger.
         ]
     ].    
     box
@@ -1836,7 +1837,7 @@
     box destroy
 
     "Modified: 9.9.1996 / 22:43:27 / stefan"
-    "Modified: 4.4.1997 / 20:58:59 / cg"
+    "Modified: 24.6.1997 / 16:48:30 / cg"
 !
 
 memorySettings
@@ -2895,11 +2896,12 @@
                 View defaultStyle:newStyle asSymbol.
             ].
             self reopenLauncher.
+            DebugView newDebugger.
         ]
     ].
     box destroy
 
-    "Modified: 8.1.1997 / 14:54:08 / cg"
+    "Modified: 24.6.1997 / 16:48:39 / cg"
 ! !
 
 !Launcher methodsFor:'actions - tools'!
@@ -4744,5 +4746,5 @@
 !Launcher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.276 1997-06-24 08:05:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.277 1997-06-24 14:49:29 cg Exp $'
 ! !