925 |
(defun term-window-width () |
(defun term-window-width () |
926 |
(if (featurep 'xemacs) |
(if (featurep 'xemacs) |
927 |
(1- (window-width)) |
(1- (window-width)) |
928 |
(if window-system |
(if (and window-system overflow-newline-into-fringe) |
929 |
(window-width) |
(window-width) |
930 |
(1- (window-width))))) |
(1- (window-width))))) |
931 |
|
|
988 |
(make-local-variable 'term-width) |
(make-local-variable 'term-width) |
989 |
(setq term-width (term-window-width)) |
(setq term-width (term-window-width)) |
990 |
(setq term-height (1- (window-height))) |
(setq term-height (1- (window-height))) |
|
(term-ifnot-xemacs |
|
|
(set (make-local-variable 'overflow-newline-into-fringe) nil)) |
|
991 |
(make-local-variable 'term-terminal-parameter) |
(make-local-variable 'term-terminal-parameter) |
992 |
(make-local-variable 'term-saved-cursor) |
(make-local-variable 'term-saved-cursor) |
993 |
(make-local-variable 'term-last-input-start) |
(make-local-variable 'term-last-input-start) |