--- a/Smalltalk.st	Thu Nov 03 17:36:04 2016 +0100
+++ b/Smalltalk.st	Thu Nov 03 17:36:20 2016 +0100
@@ -3944,10 +3944,10 @@
             self fileIn:(imageName , '.rc')
         ].
 
-"/        Display notNil ifTrue:[
-"/            Display exitOnLastClose:true.
-"/        ].
-"/        Processor exitWhenNoMoreUserProcesses:true.
+        Display notNil ifTrue:[
+            Display exitOnLastClose:true.
+        ].
+        Processor exitWhenNoMoreUserProcesses:true.
 
         process := [
             'Smalltalk [info]: startup process 2 active.' infoPrintCR.
@@ -3976,7 +3976,7 @@
 "/            "/ GUI apps exit after the last user process has finished
 "/            "/
 "/            Display exitOnLastClose:true.
-"/            Processor exitWhenNoMoreUserProcesses:true.
+            Processor exitWhenNoMoreUserProcesses:true.
         ] newProcess.
         process priority:(Processor userSchedulingPriority).
         process name:'main'.
@@ -3993,9 +3993,9 @@
         ].
     ].
 
-    Display notNil ifTrue:[
-        Display exitOnLastClose:true.
-    ].
+"/    Display notNil ifTrue:[
+"/        Display exitOnLastClose:true.
+"/    ].
     "
      if view-classes exist, start dispatching;
      otherwise go into a read-eval-print loop
@@ -4423,8 +4423,8 @@
                     "/ then do not exit
                     Display notNil ifTrue:[
                         Processor exitWhenNoMoreUserProcesses:true.
-                        Display exitOnLastClose:true.
-                        Display checkForEndOfDispatch.
+                        "/ Display exitOnLastClose:true.
+                        "/ Display checkForEndOfDispatch.
                     ] ifFalse:[
                         self exit.
                     ].
@@ -4584,8 +4584,8 @@
                     "/ then do not exit
                     Display notNil ifTrue:[
                         Processor exitWhenNoMoreUserProcesses:true.
-                        Display exitOnLastClose:true.
-                        Display checkForEndOfDispatch.
+                        "/ Display exitOnLastClose:true.
+                        "/ Display checkForEndOfDispatch.
                         VerboseStartup == true ifTrue:[
                             ('Smalltalk [info]: display opened.') infoPrintCR.
                         ].