From: Karl Heuer Date: Mon, 26 Apr 1999 04:49:42 +0000 (+0000) Subject: (grep-compute-defaults): If xargs -e isn't supported, use find -exec. X-Git-Tag: emacs-20.4~326 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ac6b7d78589abd2551131431a95e6532a710aab5;p=emacs.git (grep-compute-defaults): If xargs -e isn't supported, use find -exec. --- diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index a426ea64757..5f2d3c7b059 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -560,9 +560,13 @@ to a function that generates a unique name." (format "%s -n " grep-program))) (unless grep-find-use-xargs (setq grep-find-use-xargs - (if (equal (call-process "find" nil nil nil - null-device "-print0") - 0) + (if (and + (equal (call-process "find" nil nil nil + null-device "-print0") + 0) + (equal (call-process "xargs" nil nil nil + "-0" "-e" "echo") + 0)) 'gnu))) (setq grep-find-command (cond ((eq grep-find-use-xargs 'gnu)