diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2006-11-18 21:01:33 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2006-11-18 21:01:33 +0000 |
| commit | cfefbbf4404963cdf042fb794e0456503aa8b591 (patch) | |
| tree | 683550caa3186438512f0e277120e2fe7dae750b | |
| parent | e725507a302c6c22f2d054d3c8fc359f1446d1d2 (diff) | |
| download | emacs-cfefbbf4404963cdf042fb794e0456503aa8b591.tar.gz | |
(comint-exec-1): Set EMACS and INSIDE_EMACS to t.
| -rw-r--r-- | lisp/comint.el | 3 |
1 files changed, 2 insertions, 1 deletions
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) |