--- a/Boolean.st	Thu Oct 07 17:26:35 1999 +0200
+++ b/Boolean.st	Thu Oct 07 18:25:07 1999 +0200
@@ -92,6 +92,13 @@
     ^ true
 ! !
 
+!Boolean methodsFor:'blocked'!
+
+onChangeSend:selector to:someOne
+    "/ not really an error ...
+    "/ self error:'should not be invoked for booleans'
+! !
+
 !Boolean methodsFor:'converting'!
 
 decodeAsLiteralArray
@@ -198,5 +205,5 @@
 !Boolean class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.25 1999-09-15 12:21:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.26 1999-10-07 16:25:07 ca Exp $'
 ! !