Mercurial > emacs
changeset 13271:6a084ce822e0
(comint-exec-1): Don't alter EMACS envvar if it's already defined.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 22 Oct 1995 16:56:46 +0000 |
parents | 76e69b0af94d |
children | 7ee88c335076 |
files | lisp/comint.el |
diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Sun Oct 22 16:40:53 1995 +0000 +++ b/lisp/comint.el Sun Oct 22 16:56:46 1995 +0000 @@ -587,10 +587,11 @@ ;; Some programs that use terminfo get very confused ;; if TERM is not a valid terminal type. (if (and (boundp 'system-uses-terminfo) system-uses-terminfo) - (list "EMACS=t" "TERM=unknown" + (list "TERM=unknown" (format "COLUMNS=%d" (frame-width))) - (list "EMACS=t" "TERM=emacs" + (list "TERM=emacs" (format "TERMCAP=emacs:co#%d:tc=unknown:" (frame-width)))) + (if (getenv "EMACS") nil (list "EMACS=t")) process-environment)) (default-directory (if (file-directory-p default-directory)