--- a/ProcessMonitor.st	Thu Aug 29 00:22:03 2019 +0200
+++ b/ProcessMonitor.st	Thu Aug 29 23:24:38 2019 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libtool' }"
 
+"{ NameSpace: Smalltalk }"
+
 SystemStatusMonitor subclass:#ProcessMonitor
 	instanceVariableNames:'processes hideDead runColor suspendedColor waitColor cpuUsages
 		showDetail'
@@ -154,14 +156,13 @@
     "update status display of processes"
 
     |oldList list line dIndex interrupted contextCount 
-     aProcess nm st n found running sel space oldSelection
+     aProcess nm st n found running sel oldSelection
      newSelection numHeaderLines nameLength index
      con c sender id gId r skipping startTime endTime deltaT|
 
     startTime := Timestamp now.
 
     numHeaderLines := 2.
-    space := Character space.
     nameLength := self class nameLengthInList.
 
     shown ifTrue:[
@@ -220,9 +221,9 @@
                             nm size >= nameLength ifTrue:[
                                 nm := (nm contractTo:(nameLength-1)).
                             ].
-                            line nextPutAll:nm; nextPut:space.
+                            line nextPutAll:nm; nextPut:Character space.
                         ] ifTrue:[
-                            line next:(nameLength) put:space.
+                            line spaces:(nameLength).
                         ].
 "/                        n := cpuUsages at:(id) ifAbsent:[0].
 "/                        n ~~ 0 ifTrue:[
@@ -292,9 +293,9 @@
                                 ].
                                 line nextPutAll:(((ObjectMemory addressOf:c) printStringRadix:16) leftPaddedTo:8 with:$0).
                             ] ifFalse:[
-                                line next:20 put:space.
+                                line spaces:20.
                             ].
-                            line nextPut:space.
+                            line nextPut:Character space.
                             line nextPutAll:(aProcess numberOfStackBoundaryHits printStringLeftPaddedTo:6).
                         ].
 
@@ -777,5 +778,6 @@
 !ProcessMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.84 2007-10-05 09:53:00 cg Exp $'
+    ^ '$Header$'
 ! !
+