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

Make +pop/raise return the current window

Browse source
This commit is contained in:
Ralf Beckmann 2019-12-17 21:14:35 +01:00
parent e782ef1d97
commit 7f06644490
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -415,8 +415,9 @@ the message buffer in a popup window."
;;;###autoload ;;;###autoload
(defun +popup/raise (window &optional arg) (defun +popup/raise (window &optional arg)
"Raise the current popup window into a regular window. "Raise the current popup window into a regular window and
If prefix ARG, raise the current popup into a new window." return it. If prefix ARG, raise the current popup into a new
window and return that window."
(interactive (interactive
(list (selected-window) current-prefix-arg)) (list (selected-window) current-prefix-arg))
(cl-check-type window window) (cl-check-type window window)
@ -428,7 +429,8 @@ If prefix ARG, raise the current popup into a new window."
(+popup/close window 'force) (+popup/close window 'force)
(if arg (if arg
(pop-to-buffer buffer) (pop-to-buffer buffer)
(switch-to-buffer buffer)))) (switch-to-buffer buffer))
(selected-window)))
;;;###autoload ;;;###autoload
(defun +popup/diagnose () (defun +popup/diagnose ()