ButtonController.st
changeset 2283 02cd600d410d
parent 2166 b6f4fb01cdeb
child 2308 49cfd84d2587
equal deleted inserted replaced
2282:10fc88f073ee 2283:02cd600d410d
     7  inclusion of the above copyright notice.   This software may not
     7  inclusion of the above copyright notice.   This software may not
     8  be provided or otherwise made available to, or used by, any
     8  be provided or otherwise made available to, or used by, any
     9  other person.  No title to or ownership of the software is
     9  other person.  No title to or ownership of the software is
    10  hereby transferred.
    10  hereby transferred.
    11 "
    11 "
       
    12 
       
    13 "{ Package: 'stx:libwidg' }"
    12 
    14 
    13 Controller subclass:#ButtonController
    15 Controller subclass:#ButtonController
    14 	instanceVariableNames:'enableChannel pressChannel releaseChannel pressed active entered
    16 	instanceVariableNames:'enableChannel pressChannel releaseChannel pressed active entered
    15 		isTriggerOnDown autoRepeat repeatBlock initialDelay repeatDelay
    17 		isTriggerOnDown autoRepeat repeatBlock initialDelay repeatDelay
    16 		pressActionBlock releaseActionBlock isToggle isRadio buttonDown'
    18 		pressActionBlock releaseActionBlock isToggle isRadio buttonDown'
   681 
   683 
   682 requestAutoAccept
   684 requestAutoAccept
   683     "request autoAccept from a keyboardProcessor.
   685     "request autoAccept from a keyboardProcessor.
   684      AutoAccept is allowed, if I am enabled and a default buttons controller"
   686      AutoAccept is allowed, if I am enabled and a default buttons controller"
   685 
   687 
   686     ^ self enabled and:[view isDefault]
   688     ^ true.
       
   689 "/    ^ self enabled and:[view isDefault]
   687 ! !
   690 ! !
   688 
   691 
   689 !ButtonController methodsFor:'initialization'!
   692 !ButtonController methodsFor:'initialization'!
   690 
   693 
   691 controlInitialize
   694 controlInitialize
   735 ! !
   738 ! !
   736 
   739 
   737 !ButtonController class methodsFor:'documentation'!
   740 !ButtonController class methodsFor:'documentation'!
   738 
   741 
   739 version
   742 version
   740     ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.60 2000-03-01 14:10:11 cg Exp $'
   743     ^ '$Header: /cvs/stx/stx/libwidg/ButtonController.st,v 1.61 2000-09-27 07:48:20 cg Exp $'
   741 ! !
   744 ! !