mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Grab global prefix keys with num-lock mask set.

Browse source 
* exwm-input.el (exwm-input--update-global-prefix-keys): Grab global
prefix keys with num-lock mask set, or those keys won't be activated
when num-lock is enabled.
This commit is contained in:
Chris Feng 2016-11-13 19:23:10 +08:00
parent d0c2ca75f8
commit bb0c5f4c6b
1 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
exwm-input.el
View file

@ -380,7 +380,14 @@ This value should always be overwritten.")
(slot-value grab-key 'key) keycode) (slot-value grab-key 'key) keycode)
(when (or (= 0 keycode) (when (or (= 0 keycode)
(xcb:+request-checked+request-check exwm--connection (xcb:+request-checked+request-check exwm--connection
grab-key)) grab-key)
;; Also grab this key with num-lock mask set.
(when (/= 0 xcb:keysyms:num-lock-mask)
(setf (slot-value grab-key 'modifiers)
(logior (cdr keysym)
xcb:keysyms:num-lock-mask))
(xcb:+request-checked+request-check exwm--connection
grab-key)))
(user-error "[EXWM] Failed to grab key: %s" (user-error "[EXWM] Failed to grab key: %s"
(single-key-description k)))))))))) (single-key-description k))))))))))