Mercurial > emacs
changeset 64169:20da0da3a956
(comint-postoutput-scroll-to-bottom)
(comint-show-maximum-output): Take scroll-margin into consideration.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Fri, 08 Jul 2005 13:44:42 +0000 |
parents | f7e7dd269327 |
children | 7f2745a4e8c5 |
files | lisp/comint.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Fri Jul 08 10:07:39 2005 +0000 +++ b/lisp/comint.el Fri Jul 08 13:44:42 2005 +0000 @@ -1818,7 +1818,7 @@ (= (point) (point-max))) (save-excursion (goto-char (point-max)) - (recenter -1))) + (recenter (- -1 scroll-margin)))) (select-window selected))))) nil t)) (set-buffer current)))) @@ -1852,7 +1852,7 @@ "Put the end of the buffer at the bottom of the window." (interactive) (goto-char (point-max)) - (recenter -1)) + (recenter (- -1 scroll-margin))) (defun comint-get-old-input-default () "Default for `comint-get-old-input'.