--- a/StandaloneStartup.st Fri Mar 07 09:12:50 2014 +0100
+++ b/StandaloneStartup.st Fri Mar 07 15:25:54 2014 +0100
@@ -967,7 +967,7 @@
--allowHost host ..... add host to the allowed scripting hosts
"
- |idx debugging|
+ |idx debugging baseDir|
"/ Smalltalk beHeadless:true.
"/ OperatingSystem disableSignal:(OperatingSystem sigHUP).
@@ -999,7 +999,11 @@
] ifFalse:[
self setupToolsForNoDebug.
].
- Smalltalk initSystemPath.
+ "/opt/expecco/bin/expecco -> /opt/expecco"
+ baseDir := OperatingSystem pathOfSTXExecutable asFilename directory directory.
+ Smalltalk packagePath
+ add:(baseDir constructString:'packages');
+ add:(baseDir constructString:'plugins').
(self suppressRCFileReading) ifFalse:[
self handleRCFileOptionsFromArguments:argv.
@@ -1201,11 +1205,11 @@
!StandaloneStartup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.84 2014-03-07 08:07:34 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.85 2014-03-07 14:25:54 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.84 2014-03-07 08:07:34 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.85 2014-03-07 14:25:54 stefan Exp $'
! !