equal
deleted
inserted
replaced
239 |
239 |
240 |wasEnabled| |
240 |wasEnabled| |
241 |
241 |
242 enableChannel notNil ifTrue:[ |
242 enableChannel notNil ifTrue:[ |
243 wasEnabled := enableChannel value. |
243 wasEnabled := enableChannel value. |
244 enableChannel retractInterrestFor:self. |
244 enableChannel retractInterestsFor:self. |
245 ] ifFalse:[ |
245 ] ifFalse:[ |
246 wasEnabled := true |
246 wasEnabled := true |
247 ]. |
247 ]. |
248 enableChannel := aValueHolder. |
248 enableChannel := aValueHolder. |
249 aValueHolder onChangeSend:#enableStateChange to:self. |
249 aValueHolder onChangeSend:#enableStateChange to:self. |
555 ! ! |
555 ! ! |
556 |
556 |
557 !ButtonController class methodsFor:'documentation'! |
557 !ButtonController class methodsFor:'documentation'! |
558 |
558 |
559 version |
559 version |
560 ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.24 1995-12-03 20:59:18 cg Exp $' |
560 ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.25 1995-12-15 13:03:59 cg Exp $' |
561 ! ! |
561 ! ! |