diff options
author | Gerd Moellmann <gerd@gnu.org> | 2001-03-20 15:11:31 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2001-03-20 15:11:31 +0000 |
commit | a91ad7c961c388705097f30b765dbfe16df1cc15 (patch) | |
tree | fc27f150f18b5b936b320390fffbfef54e63e3c2 | |
parent | fa88947ed16e0d26ccd9db1e182dedfcf4efbded (diff) | |
download | emacs-a91ad7c961c388705097f30b765dbfe16df1cc15.tar.gz emacs-a91ad7c961c388705097f30b765dbfe16df1cc15.tar.bz2 emacs-a91ad7c961c388705097f30b765dbfe16df1cc15.zip |
(comint-exec-1): Set columns of the terminal to
window-width instead of frame-width.
-rw-r--r-- | lisp/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/comint.el | 4 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index adaf4a5076c..0f459dec6ab 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2001-03-20 Gerd Moellmann <gerd@gnu.org> + * comint.el (comint-exec-1): Set columns of the terminal to + window-width instead of frame-width. + * info.el (Info-scroll-down): Add missing WINDOW arg for pos-visible-in-window-p. diff --git a/lisp/comint.el b/lisp/comint.el index b2b95dfe338..aadf85f7261 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -740,9 +740,9 @@ buffer. The hook `comint-exec-hook' is run after each exec." ;; if TERM is not a valid terminal type. (if (and (boundp 'system-uses-terminfo) system-uses-terminfo) (list "TERM=dumb" "TERMCAP=" - (format "COLUMNS=%d" (frame-width))) + (format "COLUMNS=%d" (window-width))) (list "TERM=emacs" - (format "TERMCAP=emacs:co#%d:tc=unknown:" (frame-width)))) + (format "TERMCAP=emacs:co#%d:tc=unknown:" (window-width)))) (if (getenv "EMACS") nil (list "EMACS=t")) process-environment)) (default-directory |