--- a/Smalltalk.st	Thu Nov 03 19:22:42 2016 +0100
+++ b/Smalltalk.st	Thu Nov 03 20:11:22 2016 +0100
@@ -4433,6 +4433,7 @@
                     
                     "/ after the script, if Screen has been opened and there are any open windows,
                     "/ then do not exit
+false ifTrue:[
                     Display notNil ifTrue:[
                         Processor exitWhenNoMoreUserProcesses:true.
                         "/ Display exitOnLastClose:true.
@@ -4440,12 +4441,14 @@
                     ] ifFalse:[
                         self exit.
                     ].
+].
                 ] newProcess.
                 process priority:(Processor userSchedulingPriority).
                 process name:'main'.
                 process beGroupLeader.
                 process resume.
 
+Processor exitWhenNoMoreUserProcesses:true.
                 Processor dispatchLoop.
                 self exit
             ].
@@ -4598,6 +4601,7 @@
                     
                     "/ after the script, if Screen has been opened and there are any open windows,
                     "/ then do not exit
+false ifTrue:[
                     Display notNil ifTrue:[
                         Processor exitWhenNoMoreUserProcesses:true.
                         "/ Display exitOnLastClose:true.
@@ -4611,12 +4615,14 @@
                         ].
                         self exit.
                     ].
+].
                 ] newProcess.
                 process priority:(Processor userSchedulingPriority).
                 process name:'main'.
                 process beGroupLeader.
                 process resume.
 
+Processor exitWhenNoMoreUserProcesses:true.
                 Processor dispatchLoop.
                 VerboseStartup == true ifTrue:[
                     ('Smalltalk [info]: exit normally.') infoPrintCR.