--- a/Smalltalk.st Mon Nov 07 15:46:24 2016 +0100
+++ b/Smalltalk.st Mon Nov 07 16:02:31 2016 +0100
@@ -743,6 +743,14 @@
VerboseStartup := true.
CommandLineArguments removeIndex:idx
].
+ (idx := CommandLineArguments indexOf:'--verbose') ~~ 0 ifTrue:[
+ VerboseLoading := true.
+ VerboseStartup := true.
+ CommandLineArguments removeIndex:idx.
+ Logger notNil ifTrue:[
+ Logger loggingThreshold: Logger severityALL.
+ ].
+ ].
"/ reinterpret those, in case given after the VM options.
(idx := CommandLineArguments indexOf:'--debugPrint') ~~ 0 ifTrue:[