feature/package+vc ab283bddb2 2/3: Request "elpa-packages.eld" instead of "elpa-packages"

[Philip Kaludercic]

branch: feature/package+vc
commit ab283bddb2505e767bdf08b063c648b87d71d33a
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Request "elpa-packages.eld" instead of "elpa-packages"
    
    * lisp/emacs-lisp/package-vc.el
    (package-vc--read-archive-data): Apply change.
    (package-vc--download-and-read-archives): Apply change.
---
 lisp/emacs-lisp/package-vc.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index 8f42767a6f..562c534002 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -145,7 +145,7 @@ name for PKG-DESC."
 This function is meant to be used as a hook for
 `package--read-archive-hook'."
   (let* ((contents-file (expand-file-name
-                         (format "archives/%s/elpa-packages" archive)
+                         (format "archives/%s/elpa-packages.eld" archive)
                          package-user-dir)))
     (when (file-exists-p contents-file)
       (with-temp-buffer
@@ -162,7 +162,7 @@ If optional argument ASYNC is non-nil, perform the downloads
 asynchronously."
   (dolist (archive package-archives)
     (condition-case-unless-debug nil
-        (package--download-one-archive archive "elpa-packages" async)
+        (package--download-one-archive archive "elpa-packages.eld" async)
       (error (message "Failed to download `%s' archive." (car archive))))))
 
 (add-hook 'package-read-archive-hook     #'package-vc--read-archive-data 20)