From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 19 Oct 2004 16:53:23 +0000 (+0000)
Subject: (eshell-grep): Don't bind compilation-process-setup-function.
X-Git-Tag: ttn-vms-21-2-B4~4474
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fcb5aa97ed3b6597b0a64b31ecefbd94a34d3393;p=emacs.git

(eshell-grep): Don't bind compilation-process-setup-function.
---

diff --git a/lisp/eshell/em-unix.el b/lisp/eshell/em-unix.el
index 43d3c9c4e5e..ce30cec6604 100644
--- a/lisp/eshell/em-unix.el
+++ b/lisp/eshell/em-unix.el
@@ -708,11 +708,7 @@ external command."
 	       (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)))