aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSamuel Bronson2012-11-30 15:37:23 +0800
committerChong Yidong2012-11-30 15:37:23 +0800
commit6fccd6e8b536a2e0d243a2aba31c34d7a422402b (patch)
treebdd380ba35ce9aeceac1d1eaad99ae9ba21ea820
parent53c9a337fa3218cdb857bd9fb75f542413f9584b (diff)
downloademacs-6fccd6e8b536a2e0d243a2aba31c34d7a422402b.tar.gz
emacs-6fccd6e8b536a2e0d243a2aba31c34d7a422402b.zip
* progmodes/grep.el (grep-compute-defaults): Do not pass the -e flag to xargs
for compatibility with BSD xargs. Fixes: debbugs:11703
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/progmodes/grep.el6
2 files changed, 9 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eef59e75ac8..d2f0824e15e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12012-11-30 Samuel Bronson <naesten@gmail.com>
2
3 * progmodes/grep.el (grep-compute-defaults): Do not pass the -e
4 flag to xargs, for compatibility with BSD xargs (Bug#11703).
5
12012-11-30 Toru TSUNEYOSHI <t_tuneyosi@hotmail.com> 62012-11-30 Toru TSUNEYOSHI <t_tuneyosi@hotmail.com>
2 7
3 * textmodes/fill.el (fill-region-as-paragraph): Handle overshoot 8 * textmodes/fill.el (fill-region-as-paragraph): Handle overshoot
@@ -11610,7 +11615,7 @@
11610 * dynamic-setting.el (font-setting-change-default-font): Don't 11615 * dynamic-setting.el (font-setting-change-default-font): Don't
11611 change the default face if SET-FONT argument is non-nil (Bug#9982). 11616 change the default face if SET-FONT argument is non-nil (Bug#9982).
11612 11617
116132012-01-29 Samuel Bronson <naesten@gmail.com> (tiny change) 116182012-01-29 Samuel Bronson <naesten@gmail.com>
11614 11619
11615 * custom.el (defcustom): Add doc link to Lisp manual (Bug#10635). 11620 * custom.el (defcustom): Add doc link to Lisp manual (Bug#10635).
11616 11621
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index c056b0f4e26..b448b7b3032 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -586,7 +586,7 @@ This function is called from `compilation-filter-hook'."
586 'exec-plus) 586 'exec-plus)
587 ((and 587 ((and
588 (grep-probe find-program `(nil nil nil ,null-device "-print0")) 588 (grep-probe find-program `(nil nil nil ,null-device "-print0"))
589 (grep-probe xargs-program `(nil nil nil "-0" "-e" "echo"))) 589 (grep-probe xargs-program `(nil nil nil "-0" "echo")))
590 'gnu) 590 'gnu)
591 (t 591 (t
592 'exec)))) 592 'exec))))
@@ -596,7 +596,7 @@ This function is called from `compilation-filter-hook'."
596 ;; Windows shells need the program file name 596 ;; Windows shells need the program file name
597 ;; after the pipe symbol be quoted if they use 597 ;; after the pipe symbol be quoted if they use
598 ;; forward slashes as directory separators. 598 ;; forward slashes as directory separators.
599 (format "%s . -type f -print0 | \"%s\" -0 -e %s" 599 (format "%s . -type f -print0 | \"%s\" -0 %s"
600 find-program xargs-program grep-command)) 600 find-program xargs-program grep-command))
601 ((memq grep-find-use-xargs '(exec exec-plus)) 601 ((memq grep-find-use-xargs '(exec exec-plus))
602 (let ((cmd0 (format "%s . -type f -exec %s" 602 (let ((cmd0 (format "%s . -type f -exec %s"
@@ -621,7 +621,7 @@ This function is called from `compilation-filter-hook'."
621 (format "%s " null-device) 621 (format "%s " null-device)
622 ""))) 622 "")))
623 (cond ((eq grep-find-use-xargs 'gnu) 623 (cond ((eq grep-find-use-xargs 'gnu)
624 (format "%s . <X> -type f <F> -print0 | \"%s\" -0 -e %s" 624 (format "%s . <X> -type f <F> -print0 | \"%s\" -0 %s"
625 find-program xargs-program gcmd)) 625 find-program xargs-program gcmd))
626 ((eq grep-find-use-xargs 'exec) 626 ((eq grep-find-use-xargs 'exec)
627 (format "%s . <X> -type f <F> -exec %s {} %s%s" 627 (format "%s . <X> -type f <F> -exec %s {} %s%s"