Emacs: Update midnight-mode.
This commit is contained in:
parent
c3828981d1
commit
55de2e863f
|
@ -60,21 +60,17 @@
|
||||||
;; Delete old buffers.
|
;; Delete old buffers.
|
||||||
;; https://www.emacswiki.org/emacs/CleanBufferList
|
;; https://www.emacswiki.org/emacs/CleanBufferList
|
||||||
(use-package midnight
|
(use-package midnight
|
||||||
|
:straight (:type built-in)
|
||||||
:defer 4
|
:defer 4
|
||||||
:init (setq midnight-delay 30 ; 30 seconds after “midnight”.
|
:init (setq midnight-delay 30 ; 30 seconds after “midnight”.
|
||||||
midnight-period (* 2 60 60)) ; Clean every 2 hours.
|
midnight-period (* 2 60 60)) ; Clean every 2 hours.
|
||||||
:custom ((clean-buffer-list-delay-general 1) ; Clean normal bufs after 1d,
|
:custom ((clean-buffer-list-delay-general 1) ; Clean normal bufs after 1d,
|
||||||
(clean-buffer-list-delay-special (* 30 60))) ; special after 30m.
|
(clean-buffer-list-delay-special (* 30 60)) ; special after 30m.
|
||||||
:config (progn
|
(clean-buffer-list-kill-regexps '("^ ?\\*" ; These are “special”.
|
||||||
(setq clean-buffer-list-kill-regexps ; Add these to special buffers.
|
"^magit-?.*:"
|
||||||
(nconc clean-buffer-list-kill-regexps
|
("\\.log$" . 3600)
|
||||||
'("^magit-?.*:"
|
"^Pfuture-Callback")))
|
||||||
"\\.log$"
|
:config (midnight-mode t))
|
||||||
"^\\*rdm\\*$"
|
|
||||||
"^\\*Backtrace\\*$"
|
|
||||||
"^Pfuture-Callback"
|
|
||||||
)))
|
|
||||||
(midnight-mode t)))
|
|
||||||
|
|
||||||
;; Dedicate windows to “purposes”.
|
;; Dedicate windows to “purposes”.
|
||||||
(use-package window-purpose
|
(use-package window-purpose
|
||||||
|
|
Loading…
Reference in New Issue
Block a user