# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1094581157 0
# Node ID 80f39c8b91c5cab7c6f8a5fed11a72fc9a723d77
# Parent  84482ed458f233d11d229be20f688575d743704e
(compilation-start): Use copy of `process-environment'
created by `copy-sequence' to not override env-vars
in the global `process-environment'.

diff -r 84482ed458f2 -r 80f39c8b91c5 lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Tue Sep 07 18:10:49 2004 +0000
+++ b/lisp/progmodes/compile.el	Tue Sep 07 18:19:17 2004 +0000
@@ -878,7 +878,7 @@
 	  ;; Set the EMACS variable, but
 	  ;; don't override users' setting of $EMACS.
 	  (unless (getenv "EMACS") '("EMACS=t"))
-	  process-environment))
+	  (copy-sequence process-environment)))
 	(thisdir default-directory)
 	outwin outbuf)
     (with-current-buffer