diff options
| author | Philip Kaludercic | 2022-11-11 18:34:14 +0100 |
|---|---|---|
| committer | Philip Kaludercic | 2022-11-17 20:37:28 +0100 |
| commit | 2ed115fc3ca98efb83206afa608f94edc48782d6 (patch) | |
| tree | 9dd80ea01f1ce6b48091d8119784ccd83129feef | |
| parent | ccd7ab84c5a8685c66ee1b62cb486c00edd2d992 (diff) | |
| download | emacs-2ed115fc3ca98efb83206afa608f94edc48782d6.tar.gz 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'.
| -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 | |||
| 1787 | \"archives/NAME/FILE\" in `package-user-dir'." | 1787 | \"archives/NAME/FILE\" in `package-user-dir'." |
| 1788 | ;; The downloaded archive contents will be read as part of | 1788 | ;; The downloaded archive contents will be read as part of |
| 1789 | ;; `package--update-downloads-in-progress'. | 1789 | ;; `package--update-downloads-in-progress'. |
| 1790 | (dolist (archive package-archives) | 1790 | (when async |
| 1791 | (cl-pushnew (cons archive file) package--downloads-in-progress | 1791 | (cl-pushnew (cons archive file) package--downloads-in-progress |
| 1792 | :test #'equal)) | 1792 | :test #'equal)) |
| 1793 | (package--with-response-buffer (cdr archive) :file file | 1793 | (package--with-response-buffer (cdr archive) :file file |