--- a/smalltalk.rc Wed Dec 21 14:24:03 2005 +0100
+++ b/smalltalk.rc Wed Dec 21 14:57:19 2005 +0100
@@ -238,11 +238,11 @@
"/ Display unBuffered.
(buildClasses
- or:[(args includes:'--noBanner')
- or:[(args includes:'--quick')
- or:[(args includes:'--faststart')
- or:[(args includes:'--fastStart')
- or:[(args includes:'--browserWindow:')
+ or:[ (args includes:'--noBanner')
+ or:[ (args includes:'--quick')
+ or:[ (args includes:'--faststart')
+ or:[ (args includes:'--fastStart')
+ or:[ Smalltalk isPlugin
]]]]]) ifFalse:[
Smalltalk fileIn:'showBanner.rc'.
].
@@ -280,9 +280,10 @@
].
((Smalltalk commandLineArguments includes:'--quick')
+ or:[ (Smalltalk isPlugin)
or:[ (Smalltalk commandLineArguments includes:'--faststart')
or:[ (Smalltalk commandLineArguments includes:'--fastStart')
- ]]) ifFalse:[
+ ]]]) ifFalse:[
'smalltalk.rc [info]: installing autoloaded classes...' infoPrintCR.
Smalltalk installAutoloadedClasses.
].
@@ -444,13 +445,15 @@
"/ - or start stx with a suppress argument.
"/
-(Smalltalk isStandAloneApp not and:[Display notNil]) ifTrue:[
+(Smalltalk isStandAloneApp not
+and:[Smalltalk isPlugin not
+and:[Display notNil
+]]) ifTrue:[
((Smalltalk commandLineArguments includes:'--noLicenceBox')
or:[(Smalltalk commandLineArguments includes:'--quick')
or:[(Smalltalk commandLineArguments includes:'--faststart')
or:[(Smalltalk commandLineArguments includes:'--fastStart')
- or:[(Smalltalk commandLineArguments includes:'--browserWindow:')
- ]]]]) ifFalse:[
+ ]]]) ifFalse:[
Smalltalk addStartBlock:[
'smalltalk.rc [info]: show licence conditions...' infoPrintCR.
LicenceBox autoload.
@@ -654,7 +657,7 @@
((Smalltalk commandLineArguments includes:'--quick')
or:[ (Smalltalk commandLineArguments includes:'--faststart')
or:[ (Smalltalk commandLineArguments includes:'--fastStart')
-or:[ (Smalltalk commandLineArguments includes:'--browserWindow:')
+or:[ (Smalltalk isPlugin)
]]]) ifFalse:[
'st.img' asFilename exists ifFalse:[
'.' asFilename isWritable ifTrue:[