# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1015115759 0
# Node ID 6046fb03f1af82fb98fa6634bc0d154296cda95d
# Parent  54f8be73559132d3d0483a606a0679049e462ead
(find-grep-dired): Rename arg to `regexp'.

diff -r 54f8be735591 -r 6046fb03f1af lisp/find-dired.el
--- a/lisp/find-dired.el	Sun Mar 03 00:34:32 2002 +0000
+++ b/lisp/find-dired.el	Sun Mar 03 00:35:59 2002 +0000
@@ -169,11 +169,11 @@
 
 (defalias 'lookfor-dired 'find-grep-dired)
 ;;;###autoload
-(defun find-grep-dired (dir args)
-  "Find files in DIR containing a regexp ARG and start Dired on output.
+(defun find-grep-dired (dir regexp)
+  "Find files in DIR containing a regexp REGEXP and start Dired on output.
 The command run (after changing into DIR) is
 
-    find . -exec grep -s ARG {} \\\; -ls
+    find . -exec grep -s -e REGEXP {} \\\; -ls
 
 Thus ARG can also contain additional grep options."
   (interactive "DFind-grep (directory): \nsFind-grep (grep regexp): ")
@@ -184,7 +184,7 @@
   ;; about symlinks, so as far as I know this is not wrong.
   (find-dired dir
 	      (concat "-type f -exec grep " find-grep-options " -e "
-		      (shell-quote-argument args)
+		      (shell-quote-argument regexp)
 		      args " {} \\\; ")))
 
 (defun find-dired-filter (proc string)