From b5e59c0380f2093f135d8c6b86610a877a87676d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 10 Nov 1993 07:10:58 +0000 Subject: [PATCH] (comint-postoutput-scroll-to-bottom): Don't treat minibuffer window specially. --- lisp/comint.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/comint.el b/lisp/comint.el index dd0e61559fa..d1f025afaaa 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -1191,7 +1191,7 @@ This function should be in the list `comint-output-filter-functions'." (current (current-buffer)) (process (get-buffer-process current)) (scroll comint-scroll-to-bottom-on-output)) - (if (and process (not (window-minibuffer-p selected))) + (if process (walk-windows (function (lambda (window) (if (eq (window-buffer window) current) @@ -1214,7 +1214,7 @@ This function should be in the list `comint-output-filter-functions'." (goto-char (point-max)) (recenter -1))) (select-window selected))))) - 'not-minibuf t)))) + nil t)))) (defun comint-show-maximum-output () "Put the end of the buffer at the bottom of the window." -- 2.39.5