--- 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:[