--- a/ButtonController.st Wed Sep 27 09:41:16 2000 +0200
+++ b/ButtonController.st Wed Sep 27 09:48:20 2000 +0200
@@ -10,6 +10,8 @@
hereby transferred.
"
+"{ Package: 'stx:libwidg' }"
+
Controller subclass:#ButtonController
instanceVariableNames:'enableChannel pressChannel releaseChannel pressed active entered
isTriggerOnDown autoRepeat repeatBlock initialDelay repeatDelay
@@ -683,7 +685,8 @@
"request autoAccept from a keyboardProcessor.
AutoAccept is allowed, if I am enabled and a default buttons controller"
- ^ self enabled and:[view isDefault]
+ ^ true.
+"/ ^ self enabled and:[view isDefault]
! !
!ButtonController methodsFor:'initialization'!
@@ -737,5 +740,5 @@
!ButtonController class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.60 2000-03-01 14:10:11 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.61 2000-09-27 07:48:20 cg Exp $'
! !