From: Chong Yidong <cyd@stupidchicken.com>
Date: Sat, 18 Nov 2006 21:01:33 +0000 (+0000)
Subject: (comint-exec-1): Set EMACS and INSIDE_EMACS to t.
X-Git-Tag: emacs-pretest-22.0.91~11
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cfefbbf4404963cdf042fb794e0456503aa8b591;p=emacs.git

(comint-exec-1): Set EMACS and INSIDE_EMACS to t.
---

diff --git a/lisp/comint.el b/lisp/comint.el
index 48b747065b5..33195204466 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -769,7 +769,8 @@ buffer.  The hook `comint-exec-hook' is run after each exec."
 	    (list "TERM=emacs"
 		  (format "TERMCAP=emacs:co#%d:tc=unknown:" (window-width))))
 	  (unless (getenv "EMACS")
-	    (list (concat "EMACS=" invocation-directory invocation-name)))
+	    (list "EMACS=t"))
+	  (list "INSIDE_EMACS=t")
 	  process-environment))
 	(default-directory
 	  (if (file-accessible-directory-p default-directory)