diff options
| author | Omar Antolín <omar.antolin@gmail.com> | 2026-03-30 13:03:12 -0600 |
|---|---|---|
| committer | Omar Antolín <omar.antolin@gmail.com> | 2026-03-30 13:03:12 -0600 |
| commit | 3c49062623eab04da95bfb4f51cea4c61c8bcf94 (patch) | |
| tree | 80a06e68d9301a4e794b264008160ae96805d932 | |
| parent | e0238889b1c946514fd967d21d70599af9c4e887 (diff) | |
Add support for consult-fd; fix #801
| -rw-r--r-- | embark-consult.el | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/embark-consult.el b/embark-consult.el index b5ad6c9..40ee940 100644 --- a/embark-consult.el +++ b/embark-consult.el @@ -329,15 +329,12 @@ category `consult-grep'." (setf (alist-get 'consult-xref embark-default-action-overrides) #'embark-consult-xref) -;;; Support for consult-find and consult-locate +;;; Support for consult-find, consult-locate and consult-fd -(setf (alist-get '(file . consult-find) embark-default-action-overrides - nil nil #'equal) - #'find-file) - -(setf (alist-get '(file . consult-locate) embark-default-action-overrides - nil nil #'equal) - #'find-file) +(dolist (cmd '(consult-find consult-locate consult-fd)) + (setf (alist-get `(file . ,cmd) embark-default-action-overrides + nil nil #'equal) + #'find-file)) ;;; Support for consult-isearch-history @@ -389,6 +386,7 @@ category `consult-grep'." "r" #'consult-ripgrep "G" #'consult-git-grep "f" #'consult-find + "d" #'consult-fd "F" #'consult-locate) (defvar embark-consult-search-map |