Filter out events relating to temp buffers

* exwm-input.el (exwm-input--on-buffer-list-update): Filter out events
relating to temp buffers by detecting if temp-buffer is present.
This commit is contained in:
Chris Feng 2017-11-05 22:31:27 +08:00
parent 3edf2e8880
commit dea874e240

View file

@ -153,9 +153,12 @@ This value should always be overwritten.")
(defun exwm-input--on-buffer-list-update () (defun exwm-input--on-buffer-list-update ()
"Run in `buffer-list-update-hook' to track input focus." "Run in `buffer-list-update-hook' to track input focus."
(when (and (eq (current-buffer) (window-buffer)) ;e.g. `with-temp-buffer'. (when (and (not (eq this-command #'handle-switch-frame))
(not (eq this-command #'handle-switch-frame)) (not (exwm-workspace--client-p))
(not (exwm-workspace--client-p))) ;; The following conditions filter out events relating to temp
;; buffers.
(eq (current-buffer) (window-buffer))
(not (get-buffer " *temp*")))
(setq exwm-input--update-focus-window (selected-window)) (setq exwm-input--update-focus-window (selected-window))
(exwm-input--update-focus-defer))) (exwm-input--update-focus-defer)))