Only add graphic frames to `exwm-manage--frame-outer-id-list'

* exwm-manage.el (exwm-manage--add-frame, exwm-manage--remove-frame):
Add checks for graphic frames.
This commit is contained in:
Chris Feng 2017-04-10 00:30:43 +08:00
parent 52dc261624
commit 7a5bb1156d

View file

@ -566,14 +566,16 @@ Would you like to kill it? "
(defun exwm-manage--add-frame (frame)
"Run in `after-make-frame-functions'."
(push (string-to-number (frame-parameter frame 'outer-window-id))
exwm-manage--frame-outer-id-list))
(when (display-graphic-p frame)
(push (string-to-number (frame-parameter frame 'outer-window-id))
exwm-manage--frame-outer-id-list)))
(defun exwm-manage--remove-frame (frame)
"Run in `delete-frame-functions'."
(setq exwm-manage--frame-outer-id-list
(delq (string-to-number (frame-parameter frame 'outer-window-id))
exwm-manage--frame-outer-id-list)))
(when (display-graphic-p frame)
(setq exwm-manage--frame-outer-id-list
(delq (string-to-number (frame-parameter frame 'outer-window-id))
exwm-manage--frame-outer-id-list))))
(defun exwm-manage--on-ConfigureRequest (data _synthetic)
"Handle ConfigureRequest event."