#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Wed, 23 Jan 2019 13:59:07 +0100
changeset 23641 d550133ce5f5
parent 23640 834c25129358
child 23642 1ab778abeb7c
#UI_ENHANCEMENT by cg class: OSProcess changed: #printOn:
OSProcess.st
--- a/OSProcess.st	Wed Jan 23 04:33:01 2019 +0000
+++ b/OSProcess.st	Wed Jan 23 13:59:07 2019 +0100
@@ -619,10 +619,16 @@
     aStream 
         nextPutAll:self className;
         nextPut:$(.
-    pid printOn:aStream.
+    exitStatus notNil ifTrue:[
+        exitStatus printOn:aStream.
+    ] ifFalse:[    
+        pid printOn:aStream.
+    ].        
     aStream space.
     command printOn:aStream.
     aStream nextPut:$)
+
+    "Modified: / 23-01-2019 / 13:55:08 / Claus Gittinger"
 ! !
 
 !OSProcess methodsFor:'private'!