master 7f359d24887: (package-quickstart-refresh): Generate marginally more efficient code

[Stefan Monnier]

branch: master
commit 7f359d248874a6fc6a1472247d3982c85dc11544
Author: Andrea Corallo <acorallo@gnu.org>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    (package-quickstart-refresh): Generate marginally more efficient code
    
    * lisp/emacs-lisp/package.el (package-quickstart-refresh): Include
    only one copy of the file names.
---
 lisp/emacs-lisp/package.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index e23a61c58a4..d4bb6710283 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -4612,8 +4612,8 @@ activations need to be changed, such as when 
`package-load-list' is modified."
                 (let ((load-suffixes '(".el" ".elc")))
                   (locate-library (package--autoloads-file-name pkg))))
                (pfile (prin1-to-string file)))
-          (insert "(let ((load-true-file-name " pfile ")\
-\(load-file-name " pfile "))\n")
+          (insert "(let* ((load-file-name " pfile ")\
+\(load-true-file-name load-file-name))\n")
           (insert-file-contents file)
           ;; Fixup the special #$ reader form and throw away comments.
           (while (re-search-forward "#\\$\\|^;\\(.*\n\\)" nil 'move)