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).
This commit is contained in:
parent
bc1ffc5f6e
commit
e1ce9904aa
1 changed files with 3 additions and 1 deletions
|
@ -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)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue