Revert "Don't use 'find-program'"

This reverts commit 10597c977d.
This commit is contained in:
Eli Zaretskii 2016-04-21 05:07:27 +03:00
parent 645f4ef13e
commit 570e0fa357

View file

@ -162,7 +162,7 @@ end it with `/'. DIR must be one of `project-roots' or
DIRS is a list of absolute directories; it should be some DIRS is a list of absolute directories; it should be some
subset of the project roots and external roots. subset of the project roots and external roots.
The default implementation uses `grep-find-program'. PROJECT is used The default implementation uses `find-program'. PROJECT is used
to find the list of ignores for each directory." to find the list of ignores for each directory."
;; FIXME: Uniquely abbreviate the roots? ;; FIXME: Uniquely abbreviate the roots?
(require 'xref) (require 'xref)
@ -171,7 +171,7 @@ to find the list of ignores for each directory."
(lambda (dir) (lambda (dir)
(let ((command (let ((command
(format "%s %s %s -type f -print0" (format "%s %s %s -type f -print0"
grep-find-program find-program
dir dir
(xref--find-ignores-arguments (xref--find-ignores-arguments
(project-ignores project dir) (project-ignores project dir)