changeset 2947 | 9bbc38256343 |
parent 2923 | 38943deb8672 |
child 2950 | 9277c8ef8f03 |
--- a/UIPainter.st Thu Jan 17 11:53:23 2013 +0100 +++ b/UIPainter.st Thu Jan 17 11:54:22 2013 +0100 @@ -3671,6 +3671,8 @@ "filter keyboard events. Return true, if I have eaten the event" + <resource: #keyboard (#CtrlCursorUp #CtrlCursorDown #CtrlCursorLeft #CtrlCursorRight)> + |key| anEvent isKeyPressEvent ifTrue:[ @@ -6794,4 +6796,5 @@ ^ '$Header$' ! ! + UIPainter initialize!