# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1201729435 0
# Node ID 60aaa6c4ca3c28d5f8ce52707c1e3d1926b45d58
# Parent  178e852f7ddf909f07d012257365056669757593
(authors): Use `find-program' and `grep-program'
instead of hardcoded program names.

diff -r 178e852f7ddf -r 60aaa6c4ca3c lisp/emacs-lisp/authors.el
--- a/lisp/emacs-lisp/authors.el	Wed Jan 30 21:25:08 2008 +0000
+++ b/lisp/emacs-lisp/authors.el	Wed Jan 30 21:43:55 2008 +0000
@@ -587,7 +587,7 @@
 buffer *Authors Errors* containing references to unknown files."
   (interactive "DEmacs source directory: ")
   (setq root (expand-file-name root))
-  (let ((logs (process-lines "find" root "-name" "ChangeLog*"))
+  (let ((logs (process-lines find-program root "-name" "ChangeLog*"))
 	(table (make-hash-table :test 'equal))
 	(buffer-name "*Authors*")
 	authors-checked-files-alist
@@ -599,7 +599,7 @@
       (when (string-match "ChangeLog\\(.[0-9]+\\)?$" log)
 	(message "Scanning %s..." log)
 	(authors-scan-change-log log table)))
-    (let ((els (process-lines "find" root "-name" "*.el")))
+    (let ((els (process-lines find-program root "-name" "*.el")))
       (dolist (file els)
 	(message "Scanning %s..." file)
 	(authors-scan-el file table)))