Add doom/popup

This commit is contained in:
Henrik Lissner 2017-02-20 00:11:05 -05:00
parent f4ff213f9b
commit 81a4e0110f

View file

@ -94,6 +94,11 @@ possible rules."
'keyboard-escape-quit)) 'keyboard-escape-quit))
(delete-window window)))) (delete-window window))))
;;;###autoload
(defun doom/popup ()
"Display currently selected buffer in a popup window."
(doom-popup-buffer (current-buffer) :align t))
(defun doom--popup-data (window) (defun doom--popup-data (window)
(let ((buffer (window-buffer window))) (let ((buffer (window-buffer window)))
`(,(buffer-name buffer) `(,(buffer-name buffer)