branch: externals/el-job commit dcdb3d8121b2d8fe227108dc9e8cc8cb84f1d63e Author: Martin Edström <meedstro...@gmail.com> Commit: Martin Edström <meedstro...@gmail.com>
Fix likely bug with :wrapup not being called --- el-job.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/el-job.el b/el-job.el index 3ee5a30e87..15b4dba982 100644 --- a/el-job.el +++ b/el-job.el @@ -493,7 +493,7 @@ evaluated many times." (respawn nil) (exec nil)) (el-job--with job - (.queue .busy .ready .sig .cores .method .benchmark .spawn-args) + (.queue .busy .ready .sig .cores .method .benchmark .spawn-args .wrapup) (unless (and .busy (eq if-busy 'noop)) (when (functionp inputs) (setq inputs (funcall inputs))) @@ -723,7 +723,7 @@ If nil, infer it from the buffer, if process is still alive." (el-job--with job ( .busy .ready .input-sets .past-elapsed .results .benchmark .queue .timestamps .id .temp-hook .anonymous .method .finish-times - .timeout ) + .timeout .wrapup ) (push (caar output) .finish-times) (when .benchmark ;; Record time spent by FUNCALL on each item in INPUTS,