emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rename popup parameter escape-quit => quit

Browse source
This commit is contained in:
Henrik Lissner 2018-01-06 02:42:53 -05:00
parent 3cbddbfd88
commit 08b479b06f
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
8 changed files with 22 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

8
modules/feature/popup/autoload.el
View file

@ -234,7 +234,7 @@ or 'other. This window parameter is ignored if FORCE-P is non-nil."
(setq window (selected-window)))
(when (and (+popup-p window)
(or force-p
(memq (+popup-parameter 'escape-quit window)
(memq (+popup-parameter 'quit window)
'(t current))))
(when +popup--remember-last
(+popup--remember (list window)))
@ -245,13 +245,13 @@ or 'other. This window parameter is ignored if FORCE-P is non-nil."
(defun +popup/close-all (&optional force-p)
"Close all open popup windows.
This will ignore popups with an `escape-quit' parameter that is either nil or
'current. This window parameter is ignored if FORCE-P is non-nil."
This will ignore popups with an `quit' parameter that is either nil or 'current.
This window parameter is ignored if FORCE-P is non-nil."
(interactive "P")
(let (targets +popup--remember-last)
(dolist (window (+popup-windows))
(when (or force-p
(memq (+popup-parameter 'escape-quit window)
(memq (+popup-parameter 'quit window)
'(t other)))
(push window targets)))
(when targets