#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Thu, 13 Oct 2016 12:00:08 +0200
changeset 16940 fede0c6f64e1
parent 16939 4b950460cad2
child 16941 9edb5cb2922f
#DOCUMENTATION by cg class: AbstractLauncherApplication comment/format in: #viewBrowse #viewDestroy #viewInspect #viewMigrate changed: #requestForWindowClose
AbstractLauncherApplication.st
--- a/AbstractLauncherApplication.st	Thu Oct 13 11:42:59 2016 +0200
+++ b/AbstractLauncherApplication.st	Thu Oct 13 12:00:08 2016 +0200
@@ -1284,7 +1284,7 @@
 requestForWindowClose
     "close request from windowing system (window close);
      confirm and ask if closing of launcher only or
-     a smalltalk-exit is wanted"
+     a Smalltalk-exit is wanted"
 
     |answer|
 
@@ -1301,7 +1301,9 @@
         ^ true
     ].
 
-    self exit
+    self exit.
+    "/ not reached
+    ^ false
 
     "Modified: / 20.5.1999 / 17:24:47 / cg"
 !
@@ -2558,7 +2560,7 @@
 
 viewBrowse
     "let user pick a view and browse its Application class. 
-     Of course, only smalltalk views are allowed"
+     Of course, only Smalltalk views are allowed"
 
     |v app appClass browser|
 
@@ -2579,7 +2581,7 @@
 
 viewDestroy
     "let user pick a view and destroy it.
-     Even allow destroying non-smalltalk views
+     Even allow destroying non-Smalltalk views
      (also for views which I forgot due to some error)"
 
     |screen v id i c|
@@ -2626,7 +2628,7 @@
 
 viewInspect
     "let user pick a view and inspect it. 
-     Of course, only smalltalk views are allowed"
+     Of course, only Smalltalk views are allowed"
 
     |v|
 
@@ -2637,7 +2639,7 @@
 
 viewMigrate
     "let user pick a view and migrate it to some other display.
-     Only smalltalk views are allowed"
+     Only Smalltalk views are allowed"
 
     |v|