mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-26 08:10:47 -07:00
Code Issues Projects Releases Wiki Activity

Request "elpa-packages.eld" instead of "elpa-packages"

Browse source 
* lisp/emacs-lisp/package-vc.el
(package-vc--read-archive-data): Apply change.
(package-vc--download-and-read-archives): Apply change.
This commit is contained in:
Philip Kaludercic 2022-10-22 00:06:02 +02:00
parent 5694278af3
commit ab283bddb2
No known key found for this signature in database
GPG key ID: F2C3CC513DB89F66
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/package-vc.el
View file

@ -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)