branch: externals/el-job
commit e77b672d36ddc65d8a485e5425da028050a72d16
Author: Martin Edström <meedstro...@gmail.com>
Commit: Martin Edström <meedstro...@gmail.com>

    Hotfix
---
 el-job.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/el-job.el b/el-job.el
index 30cb678cfa..2d82606d63 100644
--- a/el-job.el
+++ b/el-job.el
@@ -422,7 +422,8 @@ still at work.  IF-BUSY may take on one of three symbols:
           (setq do-exec t))
         (when do-exec
           (setf .callback callback)
-          (unless (seq-every-p #'process-live-p .ready)
+          (unless (and (not (null .ready))
+                       (seq-every-p #'process-live-p .ready))
             (setq do-respawn t))
           (let ((new-spawn-args (list job
                                       load-features

Reply via email to