diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-07 13:02:01 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-07 13:02:01 +0200 |
| commit | e1ce9904aa5511468d295cac3221cb77de994331 (patch) | |
| tree | 47befa3cc59041bb99f5f208adbdcef51ace021c /lisp/emacs-lisp | |
| parent | bc1ffc5f6e4f560dec04637e1aeadb7a5db918c4 (diff) | |
| download | emacs-e1ce9904aa5511468d295cac3221cb77de994331.tar.gz emacs-e1ce9904aa5511468d295cac3221cb77de994331.tar.bz2 emacs-e1ce9904aa5511468d295cac3221cb77de994331.zip | |
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).
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 37dcbe36c8b..dfd2148aa6b 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) |