UIObjectView.st
changeset 2550 53294c69f292
parent 2548 c3ee3b652ef7
child 2554 226127373d77
equal deleted inserted replaced
2549:55c5ca5f8689 2550:53294c69f292
   594     ].
   594     ].
   595 
   595 
   596     (widget isComponentOf:self) ifFalse:[
   596     (widget isComponentOf:self) ifFalse:[
   597         ^ false
   597         ^ false
   598     ].
   598     ].
   599 self halt.
   599 
   600     "/ eat most of my events
   600     "/ eat most of my events
   601     anEvent isPointerEnterLeaveEvent ifTrue:[^ true. ^ false].
   601     anEvent isPointerEnterLeaveEvent ifTrue:[^ true. ^ false].
   602     anEvent isKeyboardFocusEvent ifTrue:[^ true. ^ false].
   602     anEvent isKeyboardFocusEvent ifTrue:[^ true. ^ false].
   603 
   603 
   604     (anEvent isButtonEvent or:[anEvent isKeyEvent]) ifFalse:[ ^ true ].
   604     (anEvent isButtonEvent or:[anEvent isKeyEvent]) ifFalse:[ ^ true ].