changeset 74058:05d799bc0cda

(comint-exec-1): Set EMACS and INSIDE_EMACS to t.
author Chong Yidong <cyd@stupidchicken.com>
date Sat, 18 Nov 2006 21:01:33 +0000
parents 636627b25f70
children 588eb3f72db6
files lisp/comint.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Sat Nov 18 21:01:11 2006 +0000
+++ b/lisp/comint.el	Sat Nov 18 21:01:33 2006 +0000
@@ -769,7 +769,8 @@
 	    (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)