Refactor doom/popup-toggle

This commit is contained in:
Henrik Lissner 2017-02-20 00:10:34 -05:00
parent 409b604d5b
commit f6b96c6e79

View file

@ -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)