--- a/BooleanValueHolder.st Mon May 19 18:12:11 2008 +0200
+++ b/BooleanValueHolder.st Mon May 19 18:12:21 2008 +0200
@@ -80,7 +80,7 @@
& anotherBooleanValueHolder
"return another valueHolder, which returns the logical and of myself and another valueHolder"
- ^ BlockValue
+ ^ BooleanBlockValue
forLogical:self and:anotherBooleanValueHolder
"
@@ -100,7 +100,7 @@
not
"return another valueHolder, which returns the logical not of myself"
- ^ BlockValue forLogicalNot:self.
+ ^ BooleanBlockValue forLogicalNot:self.
"
|b nb|
@@ -117,7 +117,7 @@
| anotherBooleanValueHolder
"return another valueHolder, which returns the logical and of myself and another valueHolder"
- ^ BlockValue
+ ^ BooleanBlockValue
forLogical:self or:anotherBooleanValueHolder
"
@@ -137,5 +137,5 @@
!BooleanValueHolder class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/BooleanValueHolder.st,v 1.1 2008-05-17 10:18:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/BooleanValueHolder.st,v 1.2 2008-05-19 16:12:21 cg Exp $'
! !