equal
deleted
inserted
replaced
496 ]. |
496 ]. |
497 key == #Copy ifTrue:[ ^ self copySelection]. |
497 key == #Copy ifTrue:[ ^ self copySelection]. |
498 key == #Paste ifTrue:[ ^ self pasteBuffer]. |
498 key == #Paste ifTrue:[ ^ self pasteBuffer]. |
499 key == #Cmdu ifTrue:[ ^ self undoLast ]. "/ #Undo |
499 key == #Cmdu ifTrue:[ ^ self undoLast ]. "/ #Undo |
500 |
500 |
|
501 super keyPress:key x:x y:y |
|
502 |
|
503 "Modified: / 31.10.1997 / 20:28:00 / cg" |
501 ! |
504 ! |
502 |
505 |
503 processEvent:anEvent |
506 processEvent:anEvent |
504 "catch expose events for components, and redraw its handles after |
507 "catch expose events for components, and redraw its handles after |
505 the redraw when this happens |
508 the redraw when this happens |