forked from Github/emacs
* lisp/savehist.el (savehist-save): Preserve shared structure
This avoids ballooning the size of variables that contain large text properties, such as the 'yank-handler' installed by 'evil-yank-rectangle', which contains a list of lines in the string. * lisp/savehist.el (savehist-save): Enable 'print-circle'. (Bug#62364) Copyright-paperwork-exempt: yes
This commit is contained in:
parent
08fbc13375
commit
90fc6b987a
1 changed files with 3 additions and 2 deletions
|
|
@ -232,8 +232,9 @@ If AUTO-SAVE is non-nil, compare the saved contents to the one last saved,
|
||||||
savehist-coding-system))
|
savehist-coding-system))
|
||||||
(run-hooks 'savehist-save-hook)
|
(run-hooks 'savehist-save-hook)
|
||||||
(let ((print-length nil)
|
(let ((print-length nil)
|
||||||
(print-level nil)
|
(print-level nil)
|
||||||
(print-quoted t))
|
(print-quoted t)
|
||||||
|
(print-circle t))
|
||||||
;; Save the minibuffer histories, along with the value of
|
;; Save the minibuffer histories, along with the value of
|
||||||
;; savehist-minibuffer-history-variables itself.
|
;; savehist-minibuffer-history-variables itself.
|
||||||
(when savehist-save-minibuffer-history
|
(when savehist-save-minibuffer-history
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue