Refactor doom/popup-toggle
This commit is contained in:
parent
409b604d5b
commit
f6b96c6e79
1 changed files with 9 additions and 10 deletions
|
@ -50,17 +50,16 @@ possible rules."
|
||||||
(setq doom-popup-history '()))
|
(setq doom-popup-history '()))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/popup-restore-or-switch ()
|
(defun doom/popup-toggle ()
|
||||||
|
"Toggle popups."
|
||||||
(interactive)
|
(interactive)
|
||||||
(let (popups)
|
(when (doom-popup-p)
|
||||||
(cond ((doom-popup-p)
|
(if doom-popup-other-window
|
||||||
(unless (doom-visible-windows)
|
(select-window doom-popup-other-window)
|
||||||
(user-error "No non-popups available"))
|
(other-window 1)))
|
||||||
(other-window 1))
|
(if (doom-popup-windows)
|
||||||
((setq popups (doom-popup-windows))
|
(doom/popup-close-all)
|
||||||
(select-window (car popups)))
|
(doom/popup-restore)))
|
||||||
(t
|
|
||||||
(doom/popup-restore)))))
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/popup-close (&optional window)
|
(defun doom/popup-close (&optional window)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue