; Fix an error in 'package-quickstart-refresh'

* lisp/emacs-lisp/package.el (package-quickstart-refresh): Fix a
thinko.  (Bug#77701)
This commit is contained in:
Eli Zaretskii 2025-04-10 16:46:00 +03:00
parent aa8a5090ec
commit cb9aded6d9

View file

@ -4633,8 +4633,9 @@ find FILE."
(insert ";; ¡¡ This file is autogenerated by `package-quickstart-refresh', DO NOT EDIT !!\n\n")
(setq package--quickstart-dir
(file-name-directory (expand-file-name package-quickstart-file)))
(insert (pp '(setq package--quickstart-dir
(file-name-directory (expand-file-name load-file-name)))))
(pp '(setq package--quickstart-dir
(file-name-directory (expand-file-name load-file-name)))
(current-buffer))
(dolist (pkg package--quickstart-pkgs)
(let* ((file
;; Prefer uncompiled files (and don't accept .so files).