emacs-diffs
[Top][All Lists]
Advanced

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

master e1ce990 2/2: Fix prin1 problem in package-quickstart-refresh


From: Lars Ingebrigtsen
Subject: master e1ce990 2/2: Fix prin1 problem in package-quickstart-refresh
Date: Sat, 7 Aug 2021 07:02:11 -0400 (EDT)

branch: master
commit e1ce9904aa5511468d295cac3221cb77de994331
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix prin1 problem in package-quickstart-refresh
    
    * lisp/emacs-lisp/package.el (package-quickstart-refresh): Bind
    print-length/print-level before using prin1-to-string (bug#49924).
---
 lisp/emacs-lisp/package.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 37dcbe3..dfd2148 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -4169,7 +4169,9 @@ activations need to be changed, such as when 
`package-load-list' is modified."
                 ;; Prefer uncompiled files (and don't accept .so files).
                 (let ((load-suffixes '(".el" ".elc")))
                   (locate-library (package--autoloads-file-name pkg))))
-               (pfile (prin1-to-string file)))
+               (pfile (let ((print-length nil)
+                            (print-level nil))
+                        (prin1-to-string file))))
           (insert "(let ((load-true-file-name " pfile ")\
 (load-file-name " pfile "))\n")
           (insert-file-contents file)



reply via email to

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