Show progress percentage during 'doom update'

This commit is contained in:
Henrik Lissner 2019-07-28 15:02:02 +02:00
parent 19ecf8e46a
commit c2af0723d7
No known key found for this signature in database
GPG Key ID: 5F6C0EA160557395

View File

@ -184,6 +184,9 @@ a list of packages that will be updated."
(futures (nreverse futures))
(specs '(t)))
(while futures
(print! ". %.0f%%" (* (/ (- total (length futures))
(float total))
100))
(while (not (async-ready (car futures)))
(sleep-for 2)
(print! "."))