doom/kill-all-buffers: reduce redundancy
This commit is contained in:
parent
a2ab9e739c
commit
358d7af9ac
1 changed files with 3 additions and 7 deletions
|
@ -202,13 +202,9 @@ 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")
|
||||||
(let ((buffers (if project-p (doom-project-buffer-list) (doom-buffer-list)))
|
|
||||||
(ignore-window-parameters t))
|
|
||||||
(delete-other-windows)
|
(delete-other-windows)
|
||||||
(switch-to-buffer (doom-fallback-buffer))
|
(switch-to-buffer (doom-fallback-buffer))
|
||||||
(let (kill-buffer-query-functions)
|
(doom/cleanup-session))
|
||||||
(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)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue