# HG changeset patch # User Juanma Barranquero # Date 1035790175 0 # Node ID c27fdc87095294633cf1139a2e61af7a6acbc17f # Parent 2bdc2b9120911a8f029bc253ade86a8697a4e195 (grep-find-use-xargs): Fix docstring. Patch from Matt Swift . diff -r 2bdc2b912091 -r c27fdc870952 lisp/progmodes/compile.el --- a/lisp/progmodes/compile.el Mon Oct 28 02:08:02 2002 +0000 +++ b/lisp/progmodes/compile.el Mon Oct 28 07:29:35 2002 +0000 @@ -632,7 +632,7 @@ (defvar grep-find-use-xargs nil "Whether \\[grep-find] uses the `xargs' utility by default. -If nil, it uses `grep -exec'; if `gnu', it uses `find -print0' and `xargs -0'; +If nil, it uses `find -exec'; if `gnu', it uses `find -print0' and `xargs -0'; if not nil and not `gnu', it uses `find -print' and `xargs'. This variable's value takes effect when `grep-compute-defaults' is called.") @@ -922,7 +922,7 @@ (if (stringp subdirs) subdirs (mapconcat 'identity subdirs " ")) - nil) ;; we change default-directory to dir + nil) ;; we change default-directory to dir (and grep-tree-ignore-CVS-directories "-path '*/CVS' -prune -o ") grep-tree-ignore-case)) (default-directory dir) @@ -948,9 +948,9 @@ If current buffer is in Compilation mode for the same mode name return the name of the current buffer, so that it gets reused. Otherwise, construct a buffer name from MODE-NAME." - (cond (name-function + (cond (name-function (funcall name-function mode-name)) - (compilation-buffer-name-function + (compilation-buffer-name-function (funcall compilation-buffer-name-function mode-name)) ((and (eq major-mode 'compilation-mode) (equal mode-name (nth 2 compilation-arguments)))