Mercurial > emacs
changeset 6750:a864110c6fc7
(comint-exec-1): Handle both termcap and terminfo.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Fri, 08 Apr 1994 06:57:27 +0000 |
| parents | c409eb264509 |
| children | e4299463079d |
| files | lisp/comint.el |
| diffstat | 1 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Fri Apr 08 05:59:03 1994 +0000 +++ b/lisp/comint.el Fri Apr 08 06:57:27 1994 +0000 @@ -553,9 +553,13 @@ (defun comint-exec-1 (name buffer command switches) (let ((process-environment - (nconc (list "EMACS=t" "TERM=emacs" - (format "TERMCAP=emacs:co#%d:tc=unknown" (frame-width))) - process-environment))) + (nconc + (if (and (boundp 'system-uses-terminfo) system-uses-terminfo) + (list "EMACS=t" "TERM=unknown" + (format "COLUMNS=%d" (frame-width))) + (list "EMACS=t" "TERM=emacs" + (format "TERMCAP=emacs:co#%d:tc=unknown" (frame-width)))) + process-environment))) (apply 'start-process name buffer command switches))) ;;; Input history processing in a buffer