From 2cd96857585a34d29a2a3f6ad63f1a3110ac217f Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 9 Aug 2019 15:26:22 -0400 Subject: [PATCH] Discard timed out future correctly on 'doom update' And list packages immediately after message (no newlines). --- core/cli/packages.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/core/cli/packages.el b/core/cli/packages.el index 3e891b255..c944cd631 100644 --- a/core/cli/packages.el +++ b/core/cli/packages.el @@ -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! "."))