--- a/Monitor.st	Mon Jul 12 18:15:34 1999 +0200
+++ b/Monitor.st	Thu Jul 15 02:03:27 1999 +0200
@@ -211,7 +211,7 @@
 
     owningProcess == aProcess ifTrue:[
         count := count + additionalCount.
-        wasBlocked ifTrue:[ OperatingSystem unblockInterrupts].
+        wasBlocked ifFalse:[ OperatingSystem unblockInterrupts].
         ^ self
     ].
 
@@ -220,11 +220,11 @@
         "/ self halt.
         owningProcess := aProcess.
         count := additionalCount.
-        wasBlocked ifTrue:[ OperatingSystem unblockInterrupts].
+        wasBlocked ifFalse:[ OperatingSystem unblockInterrupts].
         ^ self
     ].
 
-    wasBlocked ifTrue:[ OperatingSystem unblockInterrupts].
+    wasBlocked ifFalse:[ OperatingSystem unblockInterrupts].
     self error:'Cannot fakeEnter monitor owned by another process'.
 
     "Created: / 8.1.1999 / 13:54:44 / cg"
@@ -285,5 +285,5 @@
 !Monitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Monitor.st,v 1.14 1999-01-08 13:00:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Monitor.st,v 1.15 1999-07-15 00:03:27 cg Exp $'
 ! !