emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

savehist: refactor text-properties cleanup

Browse source
This commit is contained in:
Henrik Lissner 2016-05-18 02:14:08 -04:00
parent 1d4e23ee11
commit 6ae5d634f3
1 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

11
core/core-editor.el
View file

@ -49,17 +49,16 @@
'(kill-ring search-ring regexp-search-ring)) '(kill-ring search-ring regexp-search-ring))
(savehist-mode 1) (savehist-mode 1)
;; text properties severely bloat the history so delete them (courtesy of PythonNut) ;; Remove text property cruft from history
(defun unpropertize-savehist () (defun unpropertize-savehist ()
(mapc (lambda (list) (mapc (lambda (list)
(with-demoted-errors (when (boundp list)
(when (boundp list) (set list (mapcar 'substring-no-properties (eval list)))))
(set list (mapcar #'substring-no-properties (eval list))))))
'(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)))
(add-hook 'kill-emacs-hook #'unpropertize-savehist) (add-hook 'kill-emacs-hook 'unpropertize-savehist)
(add-hook 'savehist-save-hook #'unpropertize-savehist) (add-hook 'savehist-save-hook 'unpropertize-savehist)
;; Keep track of recently opened files ;; Keep track of recently opened files
(require 'recentf) (require 'recentf)