[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-29 90fc6b987ad: * lisp/savehist.el (savehist-save): Preserve share
From: |
Eli Zaretskii |
Subject: |
emacs-29 90fc6b987ad: * lisp/savehist.el (savehist-save): Preserve shared structure |
Date: |
Sat, 25 Mar 2023 08:14:23 -0400 (EDT) |
branch: emacs-29
commit 90fc6b987ad8f6531834906749be4d159fc1184f
Author: Aaron L. Zeng <azeng@janestreet.com>
Commit: Eli Zaretskii <eliz@gnu.org>
* 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
---
lisp/savehist.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/savehist.el b/lisp/savehist.el
index b532668f8a4..ea8968c771b 100644
--- a/lisp/savehist.el
+++ b/lisp/savehist.el
@@ -232,8 +232,9 @@ If AUTO-SAVE is non-nil, compare the saved contents to the
one last saved,
savehist-coding-system))
(run-hooks 'savehist-save-hook)
(let ((print-length nil)
- (print-level nil)
- (print-quoted t))
+ (print-level nil)
+ (print-quoted t)
+ (print-circle t))
;; Save the minibuffer histories, along with the value of
;; savehist-minibuffer-history-variables itself.
(when savehist-save-minibuffer-history
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-29 90fc6b987ad: * lisp/savehist.el (savehist-save): Preserve shared structure,
Eli Zaretskii <=