get-shift-down in key-event%

Returns #t if the Shift key was down for the event.

• (send a-key-event get-shift-down) -> boolean