--- a/Launcher.st	Thu Dec 14 21:49:57 1995 +0100
+++ b/Launcher.st	Thu Dec 14 22:03:10 1995 +0100
@@ -1171,18 +1171,19 @@
     id := device viewIdFromPoint:p.
     v := device viewFromId:id.
     v notNil ifTrue:[
-	v topView destroy.
-	^ self
+        v topView destroy.
+        ^ self
     ].
     id = device rootView id ifTrue:[
-	^ self
+        ^ self
     ].
-    (Dialog confirm:'mhmh, this may not a be smalltalk view.\Destroy anyway ?' withCRs)
+    (Dialog confirm:'mhmh, this may not a be smalltalk view\(Or I somehow forgot about it).\Destroy anyway ?' withCRs)
     ifTrue:[
-	device destroyView:nil withId:id
+        device destroyView:nil withId:id
     ].
 
     "Modified: 18.9.1995 / 23:13:32 / claus"
+    "Modified: 14.12.1995 / 22:02:26 / cg"
 !
 
 viewHardcopy
@@ -1961,5 +1962,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.67 1995-12-12 16:56:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.68 1995-12-14 21:03:10 cg Exp $'
 ! !