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).

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 37dcbe36c8b99713c7428f9681184fe10e58911f..dfd2148aa6b95c437725cb423cd0214f475aed16 100644 (file)
--- 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)