diff options
| author | Adrián Medraño Calvo <adrian@medranocalvo.com> | 2018-08-16T12·00+0000 |
|---|---|---|
| committer | Adrián Medraño Calvo <adrian@medranocalvo.com> | 2018-08-16T12·00+0000 |
| commit | 11fecb5186ceac31aa4a78261da3969ddb6856ff (patch) | |
| tree | e2f6a77346b37fbbbd448ad390dd0af4ebb5bed0 /exwm-layout.el | |
| parent | 5c1aa4dc310444c1a73c273b581f9e5868cb9a6d (diff) | |
Use more explicit argument for excluding minibuffers
* exwm-layout.el (exwm-layout--refresh): Use a more intuitive value for specifying exclusion of minibuffers.
Diffstat (limited to 'exwm-layout.el')
| -rw-r--r-- | exwm-layout.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/exwm-layout.el b/exwm-layout.el index a03b6fb68593..18c2c27e22a0 100644 --- a/exwm-layout.el +++ b/exwm-layout.el @@ -278,7 +278,7 @@ selected by `other-buffer'." (exwm-layout--hide exwm--id))))) ;; Other frames (e.g. terminal/graphical frame of emacsclient) ;; We shall bury all `exwm-mode' buffers in this case - (setq windows (window-list frame 0)) ;exclude minibuffer + (setq windows (window-list frame 'nomini)) (let ((exwm-layout--other-buffer-exclude-exwm-mode-buffers t)) (dolist (window windows) (with-current-buffer (window-buffer window) @@ -293,7 +293,7 @@ selected by `other-buffer'." (or exwm-layout-show-all-buffers ;; Exclude X windows on other workspaces (eq frame exwm--frame))) - (setq windows (get-buffer-window-list (current-buffer) 0 frame)) + (setq windows (get-buffer-window-list (current-buffer) 'nomini frame)) (if (not windows) (when (eq frame exwm--frame) (exwm-layout--hide exwm--id)) @@ -307,7 +307,7 @@ selected by `other-buffer'." ;; need to display with some other buffer there. (setq vacated-windows (append vacated-windows (cdr (get-buffer-window-list - (current-buffer) 0 t)))) + (current-buffer) 'nomini t)))) ;; Note down when an EXWM-buffer is being covered by this ;; buffer; we don't want it to reappear in some vacated window. (let ((prev-buffer (car-safe @@ -323,7 +323,7 @@ selected by `other-buffer'." (switch-to-prev-buffer window))) ;; Make sure windows floating / on other workspaces are excluded (let ((exwm-layout--other-buffer-exclude-exwm-mode-buffers t)) - (dolist (window (window-list frame 0)) + (dolist (window (window-list frame 'nomini)) (with-current-buffer (window-buffer window) (when (and (derived-mode-p 'exwm-mode) (or exwm--floating-frame (not (eq frame exwm--frame)))) |