#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 13 Dec 2019 15:16:42 +0100
changeset 25113 f9651872e2e2
parent 25112 2a7e5788839e
child 25114 2da8de7f0bd2
#REFACTORING by cg class: Smalltalk class changed: #initializeSystem #start
Smalltalk.st
--- a/Smalltalk.st	Fri Dec 13 15:13:21 2019 +0100
+++ b/Smalltalk.st	Fri Dec 13 15:16:42 2019 +0100
@@ -695,11 +695,6 @@
         self basicInitializeSystem
     ].
 
-    idx := CommandLineArguments indexOf:'--version'.
-    idx ~~ 0 ifTrue:[
-        self versionString _errorPrintCR.
-        self exit:0.
-    ].
     "Modified: / 12-10-2010 / 11:27:47 / cg"
 !
 
@@ -4600,6 +4595,11 @@
 
     keepSplashWindow := StartupClass perform:#keepSplashWindowOpen ifNotUnderstood:[false].
 
+    idx := CommandLineArguments indexOf:'--version'.
+    idx ~~ 0 ifTrue:[
+        self versionString _errorPrintCR.
+        self exit:0.
+    ].
     "/ remove possibly leftover --debug arg (not removed in initVerboseFlags, for whatever reason)
     idx := CommandLineArguments indexOf:'--debug'.
     (idx ~~ 0) ifTrue:[