branch: elpa/helm
commit 01b2efc256ef0917ae12a83ff169baa5e35da885
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Replace cl-defun by regular defun
---
 helm-core.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/helm-core.el b/helm-core.el
index 3e9d76213d..9aa6390f2e 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -5621,10 +5621,10 @@ This will work only in Emacs-26+, i.e. Emacs versions 
that have
     (helm-kill-async-process (caar helm-async-processes))
     (setq helm-async-processes (cdr helm-async-processes))))
 
-(cl-defun helm-kill-async-process (process &optional (kill-fn 'delete-process))
+(defun helm-kill-async-process (process &optional kill-fn)
   "Stop output from `helm-output-filter' and kill associated PROCESS."
   (set-process-filter process t)
-  (funcall kill-fn process))
+  (funcall (or kill-fn #'delete-process) process))
 
 (defun helm-process-deferred-sentinel-hook (process event file)
   "Defer remote processes in sentinels.

Reply via email to