changeset 36896:76fed386fc02

(comint-exec-1): Set columns of the terminal to window-width instead of frame-width.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 20 Mar 2001 15:10:50 +0000
parents ae62d2152aea
children bd3d3bab4291
files lisp/comint.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Tue Mar 20 14:23:24 2001 +0000
+++ b/lisp/comint.el	Tue Mar 20 15:10:50 2001 +0000
@@ -740,9 +740,9 @@
 	  ;; 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