diff options
author | Philip Kaludercic <philipk@posteo.net> | 2022-11-11 18:34:14 +0100 |
---|---|---|
committer | Philip Kaludercic <philipk@posteo.net> | 2022-11-17 20:37:28 +0100 |
commit | 2ed115fc3ca98efb83206afa608f94edc48782d6 (patch) | |
tree | 9dd80ea01f1ce6b48091d8119784ccd83129feef /lisp/emacs-lisp | |
parent | ccd7ab84c5a8685c66ee1b62cb486c00edd2d992 (diff) | |
download | emacs-2ed115fc3ca98efb83206afa608f94edc48782d6.tar.gz emacs-2ed115fc3ca98efb83206afa608f94edc48782d6.tar.bz2 emacs-2ed115fc3ca98efb83206afa608f94edc48782d6.zip |
Fix indefinite loading of asynchronous downloads
* lisp/emacs-lisp/package.el (package--download-one-archive): Only add
the archive that is actually being downloaded to
'package--downloads-in-progress'.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/package.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 23e0bb15d0a..f9786febf4e 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1787,7 +1787,7 @@ similar to an entry in `package-alist'. Save the cached copy to \"archives/NAME/FILE\" in `package-user-dir'." ;; The downloaded archive contents will be read as part of ;; `package--update-downloads-in-progress'. - (dolist (archive package-archives) + (when async (cl-pushnew (cons archive file) package--downloads-in-progress :test #'equal)) (package--with-response-buffer (cdr archive) :file file |