# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 757887846 0
# Node ID 15547237786410e2928d66dad727845bdb5803bc
# Parent  e723f6be6239530fb47dee6d00e08e4b2e604fd5
(comint-show-output): Use (point-max) rather than erring when the
comint-last-input-end marker points nowhere.

diff -r e723f6be6239 -r 155472377864 lisp/comint.el
--- a/lisp/comint.el	Thu Jan 06 17:21:32 1994 +0000
+++ b/lisp/comint.el	Thu Jan 06 20:24:06 1994 +0000
@@ -1,6 +1,6 @@
 ;;; comint.el --- general command interpreter in a window stuff
 
-;; Copyright (C) 1988, 1990, 1992, 1993 Free Software Foundation, Inc.
+;; Copyright (C) 1988, 1990, 1992, 1993, 1994 Free Software Foundation, Inc.
 
 ;; Author: Olin Shivers <shivers@cs.cmu.edu>
 ;; Adapted-by: Simon Marshall <s.marshall@dcs.hull.ac.uk>
@@ -1419,7 +1419,7 @@
 Also put cursor there if the current position is not visible."
   (interactive)
   (let ((pos (point)))
-    (goto-char comint-last-input-end)
+    (goto-char (or (marker-position comint-last-input-end) (point-max)))
     (beginning-of-line 0)
     (set-window-start (selected-window) (point))
     (if (pos-visible-in-window-p pos)