diff options
| author | Richard M. Stallman | 1994-05-05 03:58:49 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-05-05 03:58:49 +0000 |
| commit | a4ab7e69739b548aa20b9641c3d00ef600a95395 (patch) | |
| tree | 10ac02f6c977fb1667d9a78d184610b9bac3c182 | |
| parent | 8144490793ecf0549e576ced870fce889c8a6f64 (diff) | |
| download | emacs-a4ab7e69739b548aa20b9641c3d00ef600a95395.tar.gz emacs-a4ab7e69739b548aa20b9641c3d00ef600a95395.zip | |
Comment change.
| -rw-r--r-- | lisp/comint.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index b83484809eb..cdf94394d4e 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -556,6 +556,13 @@ buffer. The hook `comint-exec-hook' is run after each exec." | |||
| 556 | (defun comint-exec-1 (name buffer command switches) | 556 | (defun comint-exec-1 (name buffer command switches) |
| 557 | (let ((process-environment | 557 | (let ((process-environment |
| 558 | (nconc | 558 | (nconc |
| 559 | ;; If using termcap, we specify `emacs' as the terminal type | ||
| 560 | ;; because that lets us specify a width. | ||
| 561 | ;; If using terminfo, we specify `unknown' because that is | ||
| 562 | ;; a defined terminal type. `emacs' is not a defined terminal type | ||
| 563 | ;; and there is no way for us to define it here. | ||
| 564 | ;; Some programs that use terminfo get very confused | ||
| 565 | ;; if TERM is not a valid terminal type. | ||
| 559 | (if (and (boundp 'system-uses-terminfo) system-uses-terminfo) | 566 | (if (and (boundp 'system-uses-terminfo) system-uses-terminfo) |
| 560 | (list "EMACS=t" "TERM=unknown" | 567 | (list "EMACS=t" "TERM=unknown" |
| 561 | (format "COLUMNS=%d" (frame-width))) | 568 | (format "COLUMNS=%d" (frame-width))) |