1. xemacs
  2. igrep

Commits

michaels  committed 15957bc

2007-12-17 Mike Sperber <mike@xemacs.org>

* igrep.el (igrep-find-use-xargs): Cater to the case where we have
GNU find, but no xargs -e. (Mac OS X, for example.)

  • Participants
  • Parent commits 9e8285b
  • Branches default

Comments (0)

Files changed (2)

File ChangeLog

View file
  • Ignore whitespace
+2007-12-17  Mike Sperber  <mike@xemacs.org>
+
+	* igrep.el (igrep-find-use-xargs): Cater to the case where we have
+	GNU find, but no xargs -e.  (Mac OS X, for example.)
+
 2007-08-22  Norbert Koch  <viteno@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.15 released.

File igrep.el

View file
  • Ignore whitespace
 see `igrep-find'.")
 
 (defvar igrep-find-use-xargs
-  (cond ((equal (call-process igrep-find-program nil nil nil
-                              igrep-null-device "-print0")
+  (cond ((not (equal (call-process "xargs" nil nil nil "-e") 0))
+	 nil)
+	((equal (call-process igrep-find-program nil nil nil
+			      igrep-null-device "-print0")
                 0)
 	 'gnu)
-        ((equal (call-process "xargs" nil nil nil "-e") 0)))
+	(t t))
   "Whether `\\[igrep-find]' uses the `xargs` program or not.
 If `gnu', it executes
 	`find ... -print0 | xargs -0 -e grep ...`;