awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

core/autoload/popups: doom-popup-p now accepts a buffer or window

Browse Source
This commit is contained in:
Henrik Lissner
2017-02-24 03:12:14 -05:00
parent 585a559422
commit 39ee26d669
1 changed files with 8 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
core/autoload/popups.el
View File

@ -2,10 +2,14 @@
(provide 'doom-lib-popups)
;;;###autoload
(defun doom-popup-p (&optional window)
"Return t if WINDOW is a popup. Uses current window if WINDOW is omitted."
(let ((window (or window (selected-window))))
(and window (window-parameter window 'popup))))
(defun doom-popup-p (&optional target)
"Return t if TARGET (a window or buffer) is a popup. Uses current window if
omitted."
(when-let (target (or target (selected-window)))
(cond ((bufferp target)
(buffer-local-value 'doom-popup-mode target))
((windowp target)
(window-parameter target 'popup)))))
;;;###autoload
(defun doom-popup-buffer (buffer &rest plist)