]> git.eshelyaron.com Git - emacs.git/commitdiff
(comint-show-output): Use (point-max) rather than erring when the
authorRoland McGrath <roland@gnu.org>
Thu, 6 Jan 1994 20:24:06 +0000 (20:24 +0000)
committerRoland McGrath <roland@gnu.org>
Thu, 6 Jan 1994 20:24:06 +0000 (20:24 +0000)
comint-last-input-end marker points nowhere.

lisp/comint.el

index b76aacfc57e8a140e8735e36fb9914e14ba16ba5..1073970a5ff53e9b1452f445030b57fbf1bff0ad 100644 (file)
@@ -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 @@ Does not delete the prompt."
 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)