Mirrors/exwm2
2
0
Fork 0
mirror of https://github.com/emacs-exwm/exwm.git synced 2024-11-30 16:07:59 +01:00
Code Issues Projects Releases Packages Wiki Activity

Merge branch 'nbarrientos.github.com/post-command-hook' into externals/exwm

Browse source
This commit is contained in:
Adrián Medraño Calvo 2023-06-09 00:00:00 +00:00
commit a417f0d45e
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
exwm-input.el
View file

@ -452,9 +452,12 @@ ARGS are additional arguments to CALLBACK."
(t
;; Replay this event by default.
(setq fake-last-command t)
(setq mode xcb:Allow:ReplayPointer))))
(when fake-last-command
(exwm-input--fake-last-command))
(setq mode xcb:Allow:ReplayPointer)))
(when fake-last-command
(if buffer
(with-current-buffer buffer
(exwm-input--fake-last-command))
(exwm-input--fake-last-command))))
(xcb:+request exwm--connection
(make-instance 'xcb:AllowEvents :mode mode :time xcb:Time:CurrentTime))
(xcb:flush exwm--connection))