Unpropertize kill-ring in savehist data
This speeds up startup marginally.
This commit is contained in:
parent
2e25989dc5
commit
05d9a83ff7
1 changed files with 7 additions and 1 deletions
|
@ -93,7 +93,13 @@ fundamental-mode) for performance sake."
|
||||||
savehist-save-minibuffer-history t
|
savehist-save-minibuffer-history t
|
||||||
savehist-autosave-interval nil ; save on kill only
|
savehist-autosave-interval nil ; save on kill only
|
||||||
savehist-additional-variables '(kill-ring search-ring regexp-search-ring))
|
savehist-additional-variables '(kill-ring search-ring regexp-search-ring))
|
||||||
(savehist-mode +1))
|
(savehist-mode +1)
|
||||||
|
|
||||||
|
(defun doom|unpropertize-kill-ring ()
|
||||||
|
"Remove text properties from `kill-ring' in the interest of shrinking the
|
||||||
|
savehist file."
|
||||||
|
(setq kill-ring (mapcar #'substring-no-properties kill-ring)))
|
||||||
|
(add-hook 'kill-emacs-hook #'doom|unpropertize-kill-ring))
|
||||||
|
|
||||||
;; persistent point location in buffers
|
;; persistent point location in buffers
|
||||||
(def-package! saveplace
|
(def-package! saveplace
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue