diff options
| author | Miha Rihtaršič | 2021-10-05 09:42:28 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-10-05 09:42:28 +0200 |
| commit | 570e2c9a17ca0b2964bb79e18b8cb5dda5fe9a98 (patch) | |
| tree | 05a7feaa408f034bb895e3747746f92f45383370 | |
| parent | fd7bb314128baa270d63c79fac97792be5a271e2 (diff) | |
| download | emacs-570e2c9a17ca0b2964bb79e18b8cb5dda5fe9a98.tar.gz emacs-570e2c9a17ca0b2964bb79e18b8cb5dda5fe9a98.zip | |
Fix small error in comint-send-input
* lisp/comint.el (comint-send-input): Run
comint-output-filter-functions with comint-last-output-start set
correctly (bug#51009).
| -rw-r--r-- | lisp/comint.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index 1e5b990c77a..a0873c0b6a1 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -1990,6 +1990,7 @@ Similarly for Soar, Scheme, etc." | |||
| 1990 | 1990 | ||
| 1991 | ;; This used to call comint-output-filter-functions, | 1991 | ;; This used to call comint-output-filter-functions, |
| 1992 | ;; but that scrolled the buffer in undesirable ways. | 1992 | ;; but that scrolled the buffer in undesirable ways. |
| 1993 | (set-marker comint-last-output-start pmark) | ||
| 1993 | (run-hook-with-args 'comint-output-filter-functions ""))))) | 1994 | (run-hook-with-args 'comint-output-filter-functions ""))))) |
| 1994 | 1995 | ||
| 1995 | (defvar comint-preoutput-filter-functions nil | 1996 | (defvar comint-preoutput-filter-functions nil |