--- a/OSProcess.st Thu May 24 14:56:53 2018 +0200
+++ b/OSProcess.st Thu May 24 17:41:40 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"{ Package: 'stx:libbasic' }"
"{ NameSpace: Smalltalk }"
@@ -499,6 +501,7 @@
newPgrp := true.
! !
+
!OSProcess methodsFor:'printing'!
printOn:aStream
@@ -716,7 +719,7 @@
"/ UserPreferences current logExecutedOSCommands:true
UserPreferences current logExecutedOSCommands ifTrue:[
- Transcript showCR:('OS command: ', self startCommand printString).
+ Transcript showCR:(('OS command: ', self startCommand printString) withColor:Color brown).
].
callingProcess := Processor activeProcess.
@@ -777,8 +780,8 @@
^ true.
- "Modified: / 22-05-2018 / 12:39:18 / Claus Gittinger"
"Modified: / 22-05-2018 / 22:14:38 / Stefan Vogel"
+ "Modified: / 24-05-2018 / 17:40:50 / Claus Gittinger"
! !
!OSProcess methodsFor:'terminating'!