From 55de2e863f525073685f94595ce17b43453c243c Mon Sep 17 00:00:00 2001 From: tastytea Date: Thu, 24 Dec 2020 01:02:00 +0100 Subject: [PATCH] Emacs: Update midnight-mode. --- init.d/basics/buffers.el | 22 +++++++++------------- 1 file changed, 9 insertions(+), 13 deletions(-) diff --git a/init.d/basics/buffers.el b/init.d/basics/buffers.el index 46cac3d..e98e359 100644 --- a/init.d/basics/buffers.el +++ b/init.d/basics/buffers.el @@ -60,21 +60,17 @@ ;; Delete old buffers. ;; https://www.emacswiki.org/emacs/CleanBufferList (use-package midnight + :straight (:type built-in) :defer 4 - :init (setq midnight-delay 30 ; 30 seconds after “midnight”. - midnight-period (* 2 60 60)) ; Clean every 2 hours. + :init (setq midnight-delay 30 ; 30 seconds after “midnight”. + midnight-period (* 2 60 60)) ; Clean every 2 hours. :custom ((clean-buffer-list-delay-general 1) ; Clean normal bufs after 1d, - (clean-buffer-list-delay-special (* 30 60))) ; special after 30m. - :config (progn - (setq clean-buffer-list-kill-regexps ; Add these to special buffers. - (nconc clean-buffer-list-kill-regexps - '("^magit-?.*:" - "\\.log$" - "^\\*rdm\\*$" - "^\\*Backtrace\\*$" - "^Pfuture-Callback" - ))) - (midnight-mode t))) + (clean-buffer-list-delay-special (* 30 60)) ; special after 30m. + (clean-buffer-list-kill-regexps '("^ ?\\*" ; These are “special”. + "^magit-?.*:" + ("\\.log$" . 3600) + "^Pfuture-Callback"))) + :config (midnight-mode t)) ;; Dedicate windows to “purposes”. (use-package window-purpose