equal
deleted
inserted
replaced
472 ! ! |
472 ! ! |
473 |
473 |
474 !WindowGroup class methodsFor:'others'! |
474 !WindowGroup class methodsFor:'others'! |
475 |
475 |
476 sendKeyboardFocusEventTo:aView withArgument:arg |
476 sendKeyboardFocusEventTo:aView withArgument:arg |
477 |sensor ev| |
477 |sensor| |
478 |
478 |
479 aView isNil ifTrue:[^ self]. |
479 aView isNil ifTrue:[ |
|
480 ^ self |
|
481 ]. |
480 |
482 |
481 (sensor := aView sensor) notNil ifTrue:[ |
483 (sensor := aView sensor) notNil ifTrue:[ |
482 ev := WindowEvent keyboardFocus:arg view:aView. |
484 sensor pushEvent:(WindowEvent keyboardFocus:arg view:aView). |
483 sensor notifyEventListenersAbout:ev. |
|
484 sensor pushEvent:ev. |
|
485 ] ifFalse:[ |
485 ] ifFalse:[ |
486 aView hasKeyboardFocus:arg |
486 aView hasKeyboardFocus:arg |
487 ]. |
487 ]. |
|
488 |
|
489 "Modified (format): / 11-04-2018 / 14:27:50 / stefan" |
488 ! ! |
490 ! ! |
489 |
491 |
490 !WindowGroup methodsFor:'accessing'! |
492 !WindowGroup methodsFor:'accessing'! |
491 |
493 |
492 creatingProcess |
494 creatingProcess |