emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/undo-tree bf2e9ba 195/195: Print complete objects when


From: Stefan Monnier
Subject: [elpa] externals/undo-tree bf2e9ba 195/195: Print complete objects when saving undo-tree history
Date: Sat, 28 Nov 2020 13:41:51 -0500 (EST)

branch: externals/undo-tree
commit bf2e9ba0c97e38e2037ff1bd01b81c15471110fd
Author: Fabrice Popineau <fabrice.popineau@gmail.com>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    Print complete objects when saving undo-tree history
    
    * packages/undo-tree/undo-tree.el (undo-tree-save-history): Print
    complete objects (bug#24469).
---
 undo-tree.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/undo-tree.el b/undo-tree.el
index 6cd72f4..e378587 100644
--- a/undo-tree.el
+++ b/undo-tree.el
@@ -4,7 +4,7 @@
 
 ;; Author: Toby Cubitt <toby-undo-tree@dr-qubit.org>
 ;; Maintainer: Toby Cubitt <toby-undo-tree@dr-qubit.org>
-;; Version: 0.7.4
+;; Version: 0.7.5
 ;; Keywords: convenience, files, undo, redo, history, tree
 ;; URL: http://www.dr-qubit.org/emacs.php
 ;; Repository: http://www.dr-qubit.org/git/undo-tree.git
@@ -3294,7 +3294,10 @@ without asking for confirmation."
          (with-temp-buffer
            (prin1 (sha1 buff) (current-buffer))
            (terpri (current-buffer))
-           (let ((print-circle t)) (prin1 tree (current-buffer)))
+            (let ((print-circle t)
+                  (print-length nil)
+                  (print-level nil))
+             (prin1 tree (current-buffer)))
            (write-region nil nil filename)))))))
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]