Fix +popup/raise not raising some windows
The command now raises the popup into the previously selected window, unless the prefix argument is used.
This commit is contained in:
parent
e10cd8cf2e
commit
2de198e749
1 changed files with 8 additions and 4 deletions
|
@ -412,9 +412,11 @@ the message buffer in a popup window."
|
|||
t)
|
||||
|
||||
;;;###autoload
|
||||
(defun +popup/raise (window)
|
||||
"Raise the current popup window into a regular window."
|
||||
(interactive (list (selected-window)))
|
||||
(defun +popup/raise (window &optional arg)
|
||||
"Raise the current popup window into a regular window.
|
||||
If prefix ARG, raise the current popup into a new window."
|
||||
(interactive
|
||||
(list (selected-window) current-prefix-arg))
|
||||
(cl-check-type window window)
|
||||
(unless (+popup-window-p window)
|
||||
(user-error "Cannot raise a non-popup window"))
|
||||
|
@ -422,7 +424,9 @@ the message buffer in a popup window."
|
|||
(+popup--inhibit-transient t)
|
||||
+popup--remember-last)
|
||||
(+popup/close window 'force)
|
||||
(display-buffer-pop-up-window buffer nil)))
|
||||
(if arg
|
||||
(pop-to-buffer buffer)
|
||||
(switch-to-buffer buffer))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +popup/diagnose ()
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue