changeset 8500 | 471943c5c70b |
parent 8488 | 5a9e025bf373 |
child 8521 | 9b4d681702fa |
--- a/SimpleView.st Fri Oct 12 12:09:13 2018 +0200 +++ b/SimpleView.st Fri Oct 12 19:04:29 2018 +0200 @@ -6507,14 +6507,7 @@ ]. superView notNil ifTrue:[ - superView - dispatchEvent:#keyPress:x:y: - arguments:(Array with:key with:0 with:0) - -"/ WindowEvent -"/ sendEvent:#keyPress:x:y: -"/ arguments:(Array with:key with:0 with:0) -"/ view:superView + superView dispatchEvent:(WindowEvent keyPress:key x:0 y:0 view:superView) ] ifFalse:[ super keyPress:key x:x y:y ]