--- a/SemaphoreMonitor.st	Fri Jan 24 21:43:22 1997 +0100
+++ b/SemaphoreMonitor.st	Fri Jan 24 23:05:05 1997 +0100
@@ -67,13 +67,13 @@
 !SemaphoreMonitor methodsFor:'drawing'!
 
 titleLine
-    ^ ' id     name    count  waiting process(es)                   '.
+    ^ ' id     name                   count waiting process(es)                   '.
 
     "
      SemaphoreMonitor open
     "
 
-    "Modified: 23.1.1997 / 04:07:54 / cg"
+    "Modified: 24.1.1997 / 23:03:48 / cg"
 !
 
 updateList
@@ -143,11 +143,11 @@
                 list add:(
                           (id printStringPaddedTo:6)
                           , ' '
-                          , ((nm contractTo:10) paddedTo:10)
+                          , ((nm contractTo:25) paddedTo:25)
                           , ' '
-                          , (aSemaphore count printString paddedTo:3)
+                          , (aSemaphore count printStringLeftPaddedTo:3)
                           , ' '
-                          , (waiters size printStringPaddedTo:3)
+                          , (waiters size printStringLeftPaddedTo:3)
                           , ' '
                           , waitersNames).
 
@@ -174,7 +174,7 @@
     ]
 
     "Modified: 3.7.1996 / 13:56:01 / stefan"
-    "Modified: 23.1.1997 / 04:02:25 / cg"
+    "Modified: 24.1.1997 / 23:04:20 / cg"
 ! !
 
 !SemaphoreMonitor methodsFor:'menu'!
@@ -291,5 +291,5 @@
 !SemaphoreMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SemaphoreMonitor.st,v 1.3 1997-01-23 03:10:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SemaphoreMonitor.st,v 1.4 1997-01-24 22:05:05 cg Exp $'
 ! !