Itai Y. Efrat 2023-03-13 23:18:01 +02:00 committed by Henrik Lissner
parent 3ce89731b6
commit e5dbd4e8b1
4 changed files with 18 additions and 24 deletions

View file

@ -696,14 +696,7 @@ config blocks in your private config."
(unless (executable-find "rg")
(user-error "Can't find ripgrep on your system"))
(cond ((fboundp 'consult--grep)
(consult--grep
prompt
(lambda (input)
;; PERF: avoid converting dirs to string and back when adding them to ripgrep args.
(letf! (defun consult--command-split (&rest args)
(append (apply consult--command-split args) dirs))
(funcall (consult--ripgrep-make-builder) input)))
data-directory query))
(consult--grep prompt #'consult--ripgrep-make-builder (cons data-directory dirs) query))
((fboundp 'counsel-rg)
(let ((counsel-rg-base-command
(if (stringp counsel-rg-base-command)

View file

@ -48,4 +48,4 @@
(package! compat
:recipe (:host github :repo "emacs-compat/compat")
:pin "38280a7b54a6220377835391ead8af6fa4839117")
:pin "7775c3185764337b8a78c3005aab4a11aa80dfe8")