UIGalleryView.st
changeset 2553 2f9ced7fddeb
parent 2542 5cb4a0bdc44c
child 2561 e5a66f3365d6
equal deleted inserted replaced
2552:6b958036f5c4 2553:2f9ced7fddeb
   487 
   487 
   488     |evView p|
   488     |evView p|
   489 
   489 
   490     evView := anEvent view.
   490     evView := anEvent view.
   491     evView isNil ifTrue:[ ^ false ].
   491     evView isNil ifTrue:[ ^ false ].
       
   492     (evView ~~ self and:[ (evView isComponentOf:self) not ]) ifTrue:[ ^ false ].
   492 
   493 
   493     (anEvent isButtonPressEvent or:[anEvent isButtonReleaseEvent])ifTrue:[
   494     (anEvent isButtonPressEvent or:[anEvent isButtonReleaseEvent])ifTrue:[
   494         lastClickPoint := nil.
   495         lastClickPoint := nil.
   495     ].
   496     ].
   496     evView == self ifFalse:[
       
   497         (evView isComponentOf:self) ifFalse:[ ^ false ].
       
   498     ].
       
   499 
       
   500     anEvent isButtonEvent ifFalse:[
   497     anEvent isButtonEvent ifFalse:[
   501         anEvent isInputEvent ifTrue:[^ true].
   498         anEvent isInputEvent ifTrue:[^ true].
   502 
   499 
   503         anEvent isDamage ifTrue:[ self redrawSelection ].
   500         anEvent isDamage ifTrue:[ self redrawSelection ].
   504         ^ false
   501         ^ false