Refactor doom/kill-all-buffers & decouple from core-popup

This commit is contained in:
Henrik Lissner 2018-01-03 13:48:58 -05:00
parent 00cc57a2bd
commit ecc8051378
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -243,12 +243,13 @@ If DONT-SAVE, don't prompt to save modified buffers (discarding their changes)."
If PROJECT-P (universal argument), kill only buffers that belong to the current If PROJECT-P (universal argument), kill only buffers that belong to the current
project." project."
(interactive "P") (interactive "P")
(doom/popup-kill-all) (let ((buffers (if project-p (doom-project-buffer-list) (doom-buffer-list)))
(let ((buffers (if project-p (doom-project-buffer-list) (doom-buffer-list)))) (ignore-window-parameters t))
(mapc #'doom-kill-buffer-and-windows buffers) (delete-other-windows)
(unless (doom-real-buffer-p) (switch-to-buffer (doom-fallback-buffer))
(switch-to-buffer (doom-fallback-buffer))) (let (kill-buffer-query-functions)
(message "Killed %s buffers" (length buffers)))) (message "Killed %s buffers"
(length (delq nil (mapcar #'kill-buffer buffers)))))))
;;;###autoload ;;;###autoload
(defun doom/kill-other-buffers (&optional project-p) (defun doom/kill-other-buffers (&optional project-p)