diff options
| -rw-r--r-- | lisp/comint.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index a244aadf659..e83cd1bde15 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -1194,7 +1194,7 @@ This function should be in the list `comint-output-filter-functions'." | |||
| 1194 | (current (current-buffer)) | 1194 | (current (current-buffer)) |
| 1195 | (process (get-buffer-process current)) | 1195 | (process (get-buffer-process current)) |
| 1196 | (scroll comint-scroll-to-bottom-on-output)) | 1196 | (scroll comint-scroll-to-bottom-on-output)) |
| 1197 | (if (and process scroll (not (window-minibuffer-p selected))) | 1197 | (if (and process (not (window-minibuffer-p selected))) |
| 1198 | (walk-windows | 1198 | (walk-windows |
| 1199 | (function (lambda (window) | 1199 | (function (lambda (window) |
| 1200 | (if (eq (window-buffer window) current) | 1200 | (if (eq (window-buffer window) current) |