UIObjectView.st
changeset 1895 b7d6683ebaca
parent 1861 4c173871788a
child 1903 f409fa760169
equal deleted inserted replaced
1894:ce8fcfb4389a 1895:b7d6683ebaca
   554     "Modified: / 6.3.1999 / 22:47:48 / cg"
   554     "Modified: / 6.3.1999 / 22:47:48 / cg"
   555 !
   555 !
   556 
   556 
   557 processEvent:anEvent
   557 processEvent:anEvent
   558     "catch expose events for components, and redraw its handles after
   558     "catch expose events for components, and redraw its handles after
   559      the redraw when this happens
   559      the redraw when this happens.
   560     "
   560      Return true, if I have eaten the event"
       
   561 
   561     |evView x y p|
   562     |evView x y p|
   562 
   563 
   563     self testMode ifTrue:[^ false].
   564     self testMode ifTrue:[^ false].
   564 
   565 
   565     evView := anEvent view.
   566     evView := anEvent view.