(comint-exec-1): Provide Emacs version and `comint' in INSIDE_EMACS.

[bpt/emacs.git] / lisp / comint.el

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