mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-23 22:20:24 -08:00
Code Issues Projects Releases Wiki Activity

Fix indefinite loading of asynchronous downloads

Browse source 
* lisp/emacs-lisp/package.el (package--download-one-archive): Only add
the archive that is actually being downloaded to
'package--downloads-in-progress'.
This commit is contained in:
Philip Kaludercic 2022-11-11 18:34:14 +01:00
parent ccd7ab84c5
commit 2ed115fc3c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/package.el
View file

@ -1787,7 +1787,7 @@ similar to an entry in `package-alist'. Save the cached copy to
\"archives/NAME/FILE\" in `package-user-dir'." \"archives/NAME/FILE\" in `package-user-dir'."
;; The downloaded archive contents will be read as part of ;; The downloaded archive contents will be read as part of
;; `package--update-downloads-in-progress'. ;; `package--update-downloads-in-progress'.
(dolist (archive package-archives) (when async
(cl-pushnew (cons archive file) package--downloads-in-progress (cl-pushnew (cons archive file) package--downloads-in-progress
:test #'equal)) :test #'equal))
(package--with-response-buffer (cdr archive) :file file (package--with-response-buffer (cdr archive) :file file