# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1098204803 0
# Node ID c72da3dd9a8da18d1d7f78a7cfa4a2c569a31730
# Parent  bdfa227d18a8faf885c26cbbb71042c710fcdaf4
(eshell-grep): Don't bind compilation-process-setup-function.

diff -r bdfa227d18a8 -r c72da3dd9a8d lisp/eshell/em-unix.el
--- a/lisp/eshell/em-unix.el	Tue Oct 19 16:51:14 2004 +0000
+++ b/lisp/eshell/em-unix.el	Tue Oct 19 16:53:23 2004 +0000
@@ -708,11 +708,7 @@
 	       (eshell-parse-command (concat "*" command)
 				     (eshell-stringify-list
 				      (eshell-flatten-list args))))
-      (let* ((compilation-process-setup-function
-	      (list 'lambda nil
-		    (list 'setq 'process-environment
-			  (list 'quote (eshell-copy-environment)))))
-	     (args (mapconcat 'identity
+      (let* ((args (mapconcat 'identity
 			      (mapcar 'shell-quote-argument
 				      (eshell-stringify-list
 				       (eshell-flatten-list args)))