Mercurial > emacs

changeset 23036:ee3a3af924b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(comint-postoutput-scroll-to-bottom): Cope with unset comint-last-output-start marker.
author Richard M. Stallman <rms@gnu.org>
date Sat, 15 Aug 1998 22:27:54 +0000
parents 8d68b82a4d8c
children 88fadff500be
files lisp/comint.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Sat Aug 15 05:53:00 1998 +0000
+++ b/lisp/comint.el	Sat Aug 15 22:27:54 1998 +0000
@@ -1422,7 +1422,8 @@
 				  (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.