fix(ivy): +counsel-rg-suppress-error-code-a

Corrects the signature of process-exit-status.

Amend: 6ef86098cb
This commit is contained in:
Henrik Lissner 2024-07-10 04:02:21 -04:00
parent 6ef86098cb
commit 234cc27b77
No known key found for this signature in database
GPG key ID: B60957CA074D39A3

View file

@ -221,8 +221,9 @@ counsel-rg to discard the rest of the output to display an error.
This advice suppresses the error code, so you can still operate on whatever This advice suppresses the error code, so you can still operate on whatever
workable results ripgrep produces, despite the error." workable results ripgrep produces, despite the error."
:around #'counsel-rg :around #'counsel-rg
(letf! (defun process-exit-status (code) (letf! (defun process-exit-status (proc)
(funcall process-exit-status (if (= code 2) 0 code))) (let ((code (funcall process-exit-status proc)))
(if (= code 2) 0 code)))
(apply fn args))) (apply fn args)))
;; Integrate with `helpful' ;; Integrate with `helpful'