comint-fontify-input: Don't fontify output as input, different approach

* lisp/comint.el (comint-output-filter): Propertize process output
with field=output before inserting it into buffer to prevent
comint-fontify-input from fontifying it (bug#58169).
This commit is contained in:
Miha Rihtaršič 2022-10-06 20:22:39 +02:00 committed by Lars Ingebrigtsen
parent 46c2f152c2
commit e84b732cbc

View file

@ -2147,6 +2147,12 @@ Make backspaces delete the previous character."
(goto-char (process-mark process))
(set-marker comint-last-output-start (point))
;; Before we call `comint--mark-as-output' later,
;; redisplay can be called. We mark the inserted text as
;; output early, to prevent redisplay from fontifying it
;; as input in case of `comint-fontify-input-mode'.
(put-text-property 0 (length string) 'field 'output string)
;; insert-before-markers is a bad thing. XXX
;; Luckily we don't have to use it any more, we use
;; window-point-insertion-type instead.