Add doom-cleanup-hook to doom/cleanup-buffers

This commit is contained in:
Henrik Lissner 2017-12-26 19:27:14 -05:00
parent e8b9c7dba7
commit e024144f4f
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -308,6 +308,7 @@ project."
(defun doom/cleanup-buffers (&optional all-p) (defun doom/cleanup-buffers (&optional all-p)
"Clean up buried and inactive process buffers in the current workspace." "Clean up buried and inactive process buffers in the current workspace."
(interactive "P") (interactive "P")
(run-hooks 'doom-cleanup-hook)
(let ((buffers (doom-buried-buffers (if all-p (buffer-list)))) (let ((buffers (doom-buried-buffers (if all-p (buffer-list))))
(n 0)) (n 0))
(mapc #'kill-buffer buffers) (mapc #'kill-buffer buffers)