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

doom/popup-close: refactor

Browse Source
This commit is contained in:
Henrik Lissner
2017-03-01 22:15:32 -05:00
parent 2e66b2e13d
commit 978e121ed0
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
core/autoload/popups.el
View File

@ -74,12 +74,12 @@ Returns t if popups were restored, nil otherwise."
;;;###autoload ;;;###autoload
(defun doom/popup-close (&optional window) (defun doom/popup-close (&optional window)
"Find and close WINDOW if it's a popup. If WINDOW is omitted, it will use "Find and close WINDOW if it's a popup. If WINDOW is omitted, defaults to
`selected-window'. The contained buffer is buried." `selected-window'. The contained buffer is buried, unless it has an :autokill
property."
(interactive) (interactive)
(let ((window (or window (selected-window)))) (when-let (window (doom-popup-p window))
(when (doom-popup-p window) (delete-window window)))
(delete-window window))))
;;;###autoload ;;;###autoload
(defun doom/popup-close-all (&optional force-p) (defun doom/popup-close-all (&optional force-p)