1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 02:50:26 -08:00

* lisp/term.el (term-mode): Use `window-text-height' (Bug#5615).

This commit is contained in:
Noam Postavsky 2017-08-10 20:43:13 -04:00
parent 2326a3ab13
commit dbd3a17cb0

View file

@ -1007,7 +1007,7 @@ Entry to this mode runs the hooks on `term-mode-hook'."
(setq indent-tabs-mode nil) (setq indent-tabs-mode nil)
(setq buffer-display-table term-display-table) (setq buffer-display-table term-display-table)
(set (make-local-variable 'term-home-marker) (copy-marker 0)) (set (make-local-variable 'term-home-marker) (copy-marker 0))
(set (make-local-variable 'term-height) (1- (window-height))) (set (make-local-variable 'term-height) (window-text-height))
(set (make-local-variable 'term-width) (window-max-chars-per-line)) (set (make-local-variable 'term-width) (window-max-chars-per-line))
(set (make-local-variable 'term-last-input-start) (make-marker)) (set (make-local-variable 'term-last-input-start) (make-marker))
(set (make-local-variable 'term-last-input-end) (make-marker)) (set (make-local-variable 'term-last-input-end) (make-marker))