use #booleanAspectFor: code-saver.
--- a/UIPainter.st Mon Jul 28 12:18:34 1997 +0200
+++ b/UIPainter.st Mon Jul 28 12:45:28 1997 +0200
@@ -1299,23 +1299,15 @@
!UIPainter methodsFor:'aspects'!
canStepIn
- |holder|
-
- (holder := builder bindingAt:#canStepIn) isNil ifTrue:[
- builder aspectAt:#canStepIn put:(holder := false asValue).
- ].
- ^ holder
-
+ ^ self booleanAspectFor:#canStepIn
+
+ "Modified: 28.7.1997 / 12:41:56 / cg"
!
canStepOut
- |holder|
-
- (holder := builder bindingAt:#canStepOut) isNil ifTrue:[
- builder aspectAt:#canStepOut put:(holder := false asValue).
- ].
- ^ holder
-
+ ^ self booleanAspectFor:#canStepOut
+
+ "Modified: 28.7.1997 / 12:42:03 / cg"
!
enableChannel
@@ -1336,33 +1328,21 @@
!
hasSingleSelection
- |holder|
-
- (holder := builder bindingAt:#hasSingleSelection) isNil ifTrue:[
- builder aspectAt:#hasSingleSelection put:(holder := false asValue).
- ].
- ^ holder
-
+ ^ self booleanAspectFor:#hasSingleSelection
+
+ "Modified: 28.7.1997 / 12:42:24 / cg"
!
hasValidSelection
- |holder|
-
- (holder := builder bindingAt:#hasValidSelection) isNil ifTrue:[
- builder aspectAt:#hasValidSelection put:(holder := false asValue).
- ].
- ^ holder
-
+ ^ self booleanAspectFor:#hasValidSelection
+
+ "Modified: 28.7.1997 / 12:42:30 / cg"
!
modifiedChannel
-
- |holder|
-
- (holder := builder bindingAt:#modifiedChannel) isNil ifTrue:[
- builder aspectAt:#modifiedChannel put:(holder := false asValue).
- ].
- ^ holder
+ ^ self booleanAspectFor:#modifiedChannel
+
+ "Modified: 28.7.1997 / 12:42:38 / cg"
!
noteBookView