emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 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
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
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! "."))