---- On Fri, 11 Dec 2020 05:34:30 -0500 [hidden email] wrote ----
Hi there.
This should work:
| capsLockFilter |
capsLockFilter := PluggableEventFilter on: [:keyboardEvent |
(keyboardEvent isKeystroke
and: [keyboardEvent keyCharacter isUppercase
and: [keyboardEvent shiftPressed not]])
ifTrue: [self inform: 'CAPS LOCK ON'].
keyboardEvent].
self currentHand addKeyboardCaptureFilter: capsLockFilter.
Be sure to find a safe place for that capsLockFilter so that it won't be
garbage collected. :-) Maybe that "inform:" is too noisy for you. I don't
know.
Best,
Marcel
Squeak - Dev mailing list wrote
> Hi folks.
>
>
>
> Ignore as appropriate.
>
>
>
> Fat-finger me hits caps-lock by accident quite a bit and copy-n-paste does
> not work in morphic when that happens.
>
>
>
> A not-so-subtle indicator that "caps lock is on" would be helpful.
>
>
>
> cheers and thanks.
--
Sent from: http://forum.world.st/Squeak-Dev-f45488.html