Commit e009771e authored by Karl Heuer's avatar Karl Heuer
Browse files

(comint-exec-1): Force a local copy of the environment.

parent 681410a1
......@@ -574,7 +574,7 @@ buffer. The hook `comint-exec-hook' is run after each exec."
;;; the appropriate environment.
(defun comint-exec-1 (name buffer command switches)
(let ((process-environment process-environment))
(let ((process-environment (copy-sequence process-environment)))
(setenv "TERMCAP" (format "emacs:co#%d:tc=unknown" (frame-width)))
(setenv "TERM" "emacs")
(setenv "EMACS" "t")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment