Add `affe'

1 files changed, 16 insertions, 7 deletions

@@ -9,17 +9,26 @@
   "Perform `consult-git-grep' if in a git project, otherwise `consult-ripgrep'
 if ripgrep is installed, otherwise `consult-grep'."
   (interactive "P")
-  (cond ((executable-find "rg")
-         (call-interactively #'consult-ripgrep))
-        ((string-equal (vc-backend buffer-file-name) "Git")
-         (call-interactively #'consult-git-grep))
-        (t (call-interactively #'consult-grep))))
+  (call-interactively
+   (cond ((executable-find "rg")
+          (if (fboundp 'affe-grep)
+              #'affe-grep
+            #'consult-ripgrep))
+         ((string-equal (vc-backend buffer-file-name) "Git")
+          #'consult-git-grep)
+         (t #'consult-grep))))
 
 (defun acdw-consult/sensible-find (&optional arg)
   "Peform `consult-locate' if locate is installed, otehrwise `consult-find'."
   (interactive "P")
-  (cond ((executable-find "locate") (call-interactively #'consult-locate))
-        (t (call-interactively #'consult-find))))
+  (call-interactively
+   (cond ((executable-find "locate")
+          #'consult-locate)
+         ((fboundp 'affe-find)
+          (when (executable-find "fd")
+            (setq affe-find-command "fd -HI -t f"))
+          #'affe-find)
+         (t #'consult-find))))
 
 ;; Orderless Regexp Compiler! -- from Consult Wiki
 (defun consult--orderless-regexp-compiler (input type)