diff options
author | Richard M. Stallman <rms@gnu.org> | 1996-11-09 09:21:20 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1996-11-09 09:21:20 +0000 |
commit | 1dc152da638e0f797f8a612d3371df84e0bc141c (patch) | |
tree | 7a80407c3057d3fd291788d302556f0d754afe8d | |
parent | e5aa61607e6922a5fa8b5a9d9050ec4f80aa2e21 (diff) | |
download | emacs-1dc152da638e0f797f8a612d3371df84e0bc141c.tar.gz |
(comint-output-filter): Run comint-output-filter-functions
directly, not via comint-output-filter.
-rw-r--r-- | lisp/comint.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index 91cf20d550b..aa5e8c82530 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -1192,7 +1192,9 @@ Similarly for Soar, Scheme, etc." (set-marker comint-last-input-end (point)) (set-marker (process-mark proc) (point)) (funcall comint-input-sender proc input) - (comint-output-filter proc ""))))) + ;; This used to call comint-output-filter-functions, + ;; but that scrolled the buffer in undesirable ways. + (run-hook-with-args 'comint-output-filter-functions ""))))) ;; The purpose of using this filter for comint processes ;; is to keep comint-last-input-end from moving forward |