unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* Re: compile.el, using grep-find when find-program is not "find"
       [not found] <000501c3a3eb$31b31d90$8111ba50@LTMAP>
@ 2003-11-09  2:05 ` Richard Stallman
  0 siblings, 0 replies; only message in thread
From: Richard Stallman @ 2003-11-09  2:05 UTC (permalink / raw)
  Cc: emacs-devel

Does this patch give correct behavior?

*** compile.el.~1.281.~	Fri Oct 10 00:22:02 2003
--- compile.el	Sat Nov  8 16:53:54 2003
***************
*** 752,760 ****
  		(grep-find-use-xargs
  		 (format "%s . -type f -print | xargs %s"
                           find-program grep-command))
! 		(t (cons (format "%s . -type f -exec %s {} %s \\;"
! 				 find-program grep-command null-device)
! 			 (+ 22 (length grep-command)))))))
    (unless grep-tree-command
      (setq grep-tree-command
  	  (let* ((glen (length grep-program))
--- 752,765 ----
  		(grep-find-use-xargs
  		 (format "%s . -type f -print | xargs %s"
                           find-program grep-command))
! 		(t (let ((beginning 
! 			  (format "%s . -type f -exec " find-program))
! 			 (end
! 			  (format "%s {} %s \\;"
! 				 grep-command null-device)))
! 		     (cons
! 		      (concat beginning end)
! 		      (length beginning)))))))
    (unless grep-tree-command
      (setq grep-tree-command
  	  (let* ((glen (length grep-program))

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2003-11-09  2:05 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
     [not found] <000501c3a3eb$31b31d90$8111ba50@LTMAP>
2003-11-09  2:05 ` compile.el, using grep-find when find-program is not "find" Richard Stallman

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).