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

doom/cleanup-session: don't kill modified buffers

Browse Source
This commit is contained in:
Henrik Lissner
2018-05-30 23:06:13 +02:00
parent abd8f87e28
commit d2ca6f65b3
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
core/autoload/buffers.el
View File

@ -244,8 +244,11 @@ ALL-P (universal argument), clean them up globally."
(interactive)
(let ((buffers (doom-buried-buffers buffer-list))
(n 0))
(mapc #'kill-buffer buffers)
(setq n (+ n (length buffers) (doom/cleanup-buffer-processes)))
(dolist (buf buffers)
(unless (buffer-modified-p buf)
(kill-buffer buf)
(cl-incf n)))
(setq n (+ n (doom/cleanup-buffer-processes)))
(dolist (hook doom-cleanup-hook)
(let ((m (funcall hook)))
(when (integerp m)