branch: externals/el-job commit 1bb6865aae4368b6e9f7491bd7c3f3e6fb1d7e7c Author: Martin Edström <meedstro...@gmail.com> Commit: Martin Edström <meedstro...@gmail.com>
Extra cleanup --- el-job.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/el-job.el b/el-job.el index 6a23c6d1a5..cae92db00f 100644 --- a/el-job.el +++ b/el-job.el @@ -728,6 +728,7 @@ If nil, infer it from the buffer, if process is still alive." ;; Now there's more in the queue, run again at next good opportunity. (when .queue (when (eq .method 'reap) + (el-job--terminate job) (apply #'el-job--spawn-processes (el-job:spawn-args job))) (el-job--exec job)))))) t) @@ -746,12 +747,12 @@ This kills all process buffers, but does not deregister the ID from (kill-buffer stderr))) (defun el-job--unhide-buffer (buf) - "Rename BUFFER to omit intiial space, and return new name." + "Rename BUFFER to omit initial space, and return new name." (with-current-buffer buf (rename-buffer (string-trim-left (buffer-name))))) (defun el-job--kill-quietly-keep-buffer (proc) - "Kill PROC while silencing its sentinel and filter. + "Kill PROC while disabling its sentinel and filter. See `el-job--kill-quietly' to also kill the buffer." (set-process-filter proc #'ignore) (set-process-sentinel proc #'ignore)