*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 31 Mar 2016 14:50:32 +0200
changeset 1426 bfdc1571fffa
parent 1425 1a8a4bb13ac0
child 1427 a56e68fef227
*** empty log message ***
smalltalk.rc
--- a/smalltalk.rc	Thu Mar 31 14:36:08 2016 +0200
+++ b/smalltalk.rc	Thu Mar 31 14:50:32 2016 +0200
@@ -836,6 +836,9 @@
 "/ load initial packages
 "/
 UserPreferences current autoloadedPackages notEmpty ifTrue:[
+  (Smalltalk commandLineArguments includes:'--´noautoload') ifTrue:[
+    'smalltalk.rc [info]: autoloaded packages suppressed.' infoPrintCR.
+  ] ifFalse:[
     'smalltalk.rc [info]: loading autoloaded packages...' infoPrintCR.
     (UserPreferences current autoloadedPackages) do:[:eachPackage |
 	Smalltalk showSplashMessage:('Autoloading ',eachPackage,'...').
@@ -846,6 +849,7 @@
 	]
     ].
     Smalltalk showSplashMessage:('done.').
+  ]
 ].
 
 "/