--- a/MemoryMonitor.st	Fri Jan 24 23:05:05 1997 +0100
+++ b/MemoryMonitor.st	Fri Jan 24 23:23:40 1997 +0100
@@ -520,7 +520,7 @@
 initialize
     super initialize.
 
-    drawLock := Semaphore forMutualExclusion.
+    drawLock := Semaphore forMutualExclusion name:'drawLock'.
 
     updateInterval := 0.5.
     ProcessorScheduler isPureEventDriven ifTrue:[
@@ -857,5 +857,5 @@
 !MemoryMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitor.st,v 1.41 1997-01-23 21:39:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitor.st,v 1.42 1997-01-24 22:23:40 cg Exp $'
 ! !