--- a/ButtonController.st Thu Feb 24 19:20:00 2000 +0100
+++ b/ButtonController.st Wed Mar 01 15:10:11 2000 +0100
@@ -716,8 +716,12 @@
reinitialize
active := false.
- pressed := false.
+ (isToggle or:[isRadio]) ifFalse:[
+ pressed := false.
+ ].
entered := false.
+
+ "Modified: / 1.3.2000 / 15:17:10 / cg"
!
release
@@ -733,5 +737,5 @@
!ButtonController class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.59 1999-09-04 10:52:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.60 2000-03-01 14:10:11 cg Exp $'
! !