Check if buffer/window is live in doom-popup-p

This commit is contained in:
Henrik Lissner 2017-09-24 18:41:12 +02:00
parent 9b0d333a66
commit 78db91bdd2
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -8,9 +8,11 @@
current window if omitted."
(when-let (target (or target (selected-window)))
(cond ((bufferp target)
(buffer-local-value 'doom-popup-mode target))
(and (buffer-live-p target)
(buffer-local-value 'doom-popup-mode target)))
((windowp target)
(and (window-parameter target 'popup)
(and (window-live-p target)
(window-parameter target 'popup)
target)))))
;;;###autoload