procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(comint-postoutput-scroll-to-bottom): Cope with unset

Browse source 
comint-last-output-start marker.
This commit is contained in:
Richard M. Stallman 1998-08-15 22:27:54 +00:00
parent 5651af6d63
commit 2c3d598531
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/comint.el
View file

@ -1422,7 +1422,8 @@ This function should be in the list `comint-output-filter-functions'."
(and (eq scroll 'this) (eq selected window))
(and (eq scroll 'others) (not (eq selected window)))
;; If point was at the end, keep it at end.
(>= (point) comint-last-output-start)))
(and (marker-position comint-last-output-start)
(>= (point) comint-last-output-start))))
(goto-char (process-mark process)))
;; Optionally scroll so that the text
;; ends at the bottom of the window.