--- a/Process.st Thu Jun 02 13:20:08 1994 +0200
+++ b/Process.st Thu Jun 02 13:21:56 1994 +0200
@@ -23,7 +23,7 @@
COPYRIGHT (c) 1992 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Process.st,v 1.10 1994-03-30 09:40:59 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Process.st,v 1.11 1994-06-02 11:21:22 claus Exp $
'!
!Process methodsFor:'accessing'!
@@ -232,7 +232,8 @@
!Process methodsFor:'printing'!
printOn:aStream
- aStream nextPutAll:'a ';
+ aStream nextPutAll:state article;
+ space;
nextPutAll:state;
nextPutAll:' Process (';
nextPutAll:self nameOrId;