diff --git a/.emacs.d/lisp/init-helm.el b/.emacs.d/lisp/init-helm.el index 812657ab..cf41ed2d 100644 --- a/.emacs.d/lisp/init-helm.el +++ b/.emacs.d/lisp/init-helm.el @@ -327,4 +327,13 @@ With prefix argument, UPDATE the databases with custom uptions thanks to the (file-name-extension candidate))))) 1)) +(defun ambrevar/helm-external-command-cleanup-dotted (&optional _ignore) + "Remove dotted programs from `helm-run-external-command' list. +Useful for Guix." + (setq helm-external-commands-list + (cl-delete-if (lambda (p) (string-prefix-p "." p)) + helm-external-commands-list))) +(advice-add 'helm-external-commands-list-1 + :after #'ambrevar/helm-external-command-cleanup-dotted) + (provide 'init-helm)