awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix doom-cleanup-hook breaking if hook didn't return an integer

Browse Source
This commit is contained in:
Henrik Lissner
2018-01-07 15:03:45 -05:00
parent 8f9175c25e
commit 4bd74d9653
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
core/autoload/buffers.el
View File

@ -252,7 +252,9 @@ ALL-P (universal argument), clean them up globally."
(mapc #'kill-buffer buffers) (mapc #'kill-buffer buffers)
(setq n (+ n (length buffers) (doom/cleanup-processes))) (setq n (+ n (length buffers) (doom/cleanup-processes)))
(dolist (hook doom-cleanup-hook) (dolist (hook doom-cleanup-hook)
(setq n (+ n (or (funcall hook) 1)))) (let ((m (funcall hook)))
(when (integerp m)
(setq n (+ n m)))))
(message "Cleaned up %s buffers" n) (message "Cleaned up %s buffers" n)
n)) n))