--- a/OSProcess.st Tue Jan 16 23:22:57 2018 +0100
+++ b/OSProcess.st Wed Jan 17 13:31:40 2018 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"{ Package: 'stx:libbasic' }"
"{ NameSpace: Smalltalk }"
@@ -167,6 +169,11 @@
command := aStringOrArray.
!
+command:commandStringArg directory:stringOrFilenameArg
+ command := commandStringArg.
+ directory := stringOrFilenameArg.
+!
+
command:commandArg environment:environmentArg directory:directoryArg inStream:inStreamArg outStream:outStreamArg errorStream:errorStreamArg auxStream:auxStreamArg showWindow:showWindowArg lineWise:lineWiseArg
command := commandArg.
environment := environmentArg.
@@ -187,10 +194,10 @@
"Created: / 10.11.1998 / 21:21:52 / cg"
!
-directory:aString
+directory:aStringOrFilename
"set the directory that will be set as the current directory of the command to be executed"
- directory := aString.
+ directory := aStringOrFilename.
!
environment