# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 903220074 0
# Node ID ee3a3af924b4a8052d4cdb00ef5fde4701b8fd28
# Parent  8d68b82a4d8c2d915d3885e83d910d2b1e2ed0b9
(comint-postoutput-scroll-to-bottom): Cope with unset
comint-last-output-start marker.

diff -r 8d68b82a4d8c -r ee3a3af924b4 lisp/comint.el
--- 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.