equal
deleted
inserted
replaced
396 "Modified: / 20.5.1998 / 22:54:32 / cg" |
396 "Modified: / 20.5.1998 / 22:54:32 / cg" |
397 ! ! |
397 ! ! |
398 |
398 |
399 !KeyboardForwarder methodsFor:'focus forwarding'! |
399 !KeyboardForwarder methodsFor:'focus forwarding'! |
400 |
400 |
|
401 hasKeyboardFocus:aBoolean |
|
402 "forward focus information to my destination" |
|
403 |
|
404 destinationView notNil ifTrue:[ |
|
405 destinationView hasKeyboardFocus:aBoolean |
|
406 ]. |
|
407 |
|
408 "Modified: 25.2.1997 / 23:16:35 / cg" |
|
409 ! |
|
410 |
401 showFocus:explicit |
411 showFocus:explicit |
402 "forward focus information to my destination" |
412 "forward focus information to my destination" |
403 |
413 |
404 |d| |
414 |d| |
405 |
415 |
484 ! ! |
494 ! ! |
485 |
495 |
486 !KeyboardForwarder class methodsFor:'documentation'! |
496 !KeyboardForwarder class methodsFor:'documentation'! |
487 |
497 |
488 version |
498 version |
489 ^ '$Header: /cvs/stx/stx/libview/Attic/KeybdFwd.st,v 1.23 1998-05-20 23:56:12 cg Exp $' |
499 ^ '$Header: /cvs/stx/stx/libview/Attic/KeybdFwd.st,v 1.24 1999-03-14 13:00:11 cg Exp $' |
490 ! ! |
500 ! ! |