awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Discard timed out future correctly on 'doom update'

Browse Source 
And list packages immediately after message (no newlines).
This commit is contained in:
Henrik Lissner
2019-08-09 15:26:22 -04:00
parent 624c5e1a71
commit 2cd9685758
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
core/cli/packages.el
View File

@ -224,11 +224,11 @@ a list of packages that will be updated."
(catch 'timeout
(while (not (async-ready (caar futures)))
(when (> time timeout)
(print! (warn "A thread has timed out. The following packages were skipped:\n\n %s"
(print! (warn "A thread has timed out. The following packages were skipped: %s"
(mapconcat (lambda (p) (plist-get p :package))
(cdar futures)
", ")))
(throw 'timeout t))
(throw 'timeout (pop futures)))
(sleep-for 2)
(cl-incf time)
(print! "."))