summaryrefslogtreecommitdiff
path: root/lisp/comint.el
diff options
context:
space:
mode:
authorMiha Rihtaršič <miha@kamnitnik.top>2021-10-05 09:42:28 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2021-10-05 09:42:28 +0200
commit570e2c9a17ca0b2964bb79e18b8cb5dda5fe9a98 (patch)
tree05a7feaa408f034bb895e3747746f92f45383370 /lisp/comint.el
parentfd7bb314128baa270d63c79fac97792be5a271e2 (diff)
downloademacs-570e2c9a17ca0b2964bb79e18b8cb5dda5fe9a98.tar.gz
emacs-570e2c9a17ca0b2964bb79e18b8cb5dda5fe9a98.tar.bz2
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).
Diffstat (limited to 'lisp/comint.el')
-rw-r--r--lisp/comint.el1
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."
;; This used to call comint-output-filter-functions,
;; but that scrolled the buffer in undesirable ways.
+ (set-marker comint-last-output-start pmark)
(run-hook-with-args 'comint-output-filter-functions "")))))
(defvar comint-preoutput-filter-functions nil