--- a/Smalltalk.st Fri Dec 11 17:54:52 2009 +0100
+++ b/Smalltalk.st Fri Dec 11 18:09:31 2009 +0100
@@ -3891,6 +3891,9 @@
idx := CommandLineArguments indexOf:'-e'.
idx == 0 ifTrue:[
idx := CommandLineArguments indexOf:'--execute'.
+ idx == 0 ifTrue:[
+ idx := CommandLineArguments indexOf:'--script'.
+ ].
].
idx ~~ 0 ifTrue:[
arg := CommandLineArguments at:idx + 1.
@@ -7409,9 +7412,9 @@
!Smalltalk class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.915 2009-12-11 16:54:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.916 2009-12-11 17:09:31 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.915 2009-12-11 16:54:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.916 2009-12-11 17:09:31 cg Exp $'
! !