doom-visible-windows: fix predicate for 'popup window'

This commit is contained in:
Henrik Lissner 2018-01-03 13:43:08 -05:00
parent f3562eb038
commit e9a012af34
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -105,7 +105,9 @@ If DERIVED-P, test with `derived-mode-p', otherwise use `eq'."
;;;###autoload
(defun doom-visible-windows (&optional window-list)
"Return a list of the visible, non-popup windows."
(cl-remove-if #'window-at-side-p (or window-list (window-list))))
(cl-loop for window in (or window-list (window-list))
unless (eq (window-dedicated-p window) 'side)
collect window))
;;;###autoload
(defun doom-visible-buffers (&optional buffer-list)