Fix savehist causing pauses due to faulty hook
This commit is contained in:
parent
b8c97bee47
commit
3c1a6f91cc
1 changed files with 4 additions and 3 deletions
|
@ -44,14 +44,15 @@
|
||||||
(require 'savehist)
|
(require 'savehist)
|
||||||
(setq savehist-file (concat doom-cache-dir "savehist")
|
(setq savehist-file (concat doom-cache-dir "savehist")
|
||||||
savehist-save-minibuffer-history t
|
savehist-save-minibuffer-history t
|
||||||
|
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)
|
||||||
|
|
||||||
;; Remove text-property cruft from history
|
;; Remove text-property cruft from history
|
||||||
(defun doom|unpropertize-savehist ()
|
(defun doom|unpropertize-savehist ()
|
||||||
(mapc (lambda (list)
|
(mapc (lambda (sym)
|
||||||
(when (boundp list)
|
(when (boundp sym)
|
||||||
(set list (mapcar 'substring-no-properties (eval list)))))
|
(setf (symbol-value sym) (mapcar 'substring-no-properties (symbol-value sym)))))
|
||||||
'(kill-ring minibuffer-history helm-grep-history helm-ff-history
|
'(kill-ring minibuffer-history helm-grep-history helm-ff-history
|
||||||
file-name-history read-expression-history extended-command-history
|
file-name-history read-expression-history extended-command-history
|
||||||
evil-ex-history)))
|
evil-ex-history)))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue