StandaloneStartup.st
changeset 23675 cb888670c53b
parent 23674 e5f82ce1fa30
child 23676 231e0a0fb4cc
--- a/StandaloneStartup.st	Wed Feb 06 20:14:57 2019 +0100
+++ b/StandaloneStartup.st	Wed Feb 06 20:17:42 2019 +0100
@@ -1181,11 +1181,12 @@
     ] do:[
         |idx|
 
+        CommandLineArguments := (self additionalArgumentsFromRegistry) 
+                                , Smalltalk commandLineArguments.
 self setupSmalltalkFromArguments:CommandLineArguments.
+
         Smalltalk showSplashMessage:'start'.
         self verboseInfo:'starting...'.
-        CommandLineArguments := (self additionalArgumentsFromRegistry) 
-                                , Smalltalk commandLineArguments.
 
         self verboseInfo:('args: ', CommandLineArguments asStringCollection asString).
 
@@ -1219,7 +1220,7 @@
     ].
 
     "Modified: / 04-02-2011 / 00:03:47 / cg"
-    "Modified: / 06-02-2019 / 20:14:22 / Claus Gittinger"
+    "Modified: / 06-02-2019 / 20:17:24 / Claus Gittinger"
 !
 
 startStartBlockProcess