From 424532459bb29134a6f22316b38e0f93acd2ee44 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Thu, 6 Jan 1994 20:24:06 +0000 Subject: [PATCH] (comint-show-output): Use (point-max) rather than erring when the comint-last-input-end marker points nowhere. --- lisp/comint.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/comint.el b/lisp/comint.el index b76aacfc57e..1073970a5ff 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -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 ;; Adapted-by: Simon Marshall @@ -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) -- 2.39.5