(defcustom comint-highlight-input t
"If non-nil, highlight input with `comint-highlight-input' face.
Otherwise keep the original highlighting untouched."
+ :version "28.1"
:type 'boolean
:group 'comint)
(with-silent-modifications
(when (> end beg)
(when comint-highlight-input
- (add-text-properties beg end
- '(front-sticky t
- font-lock-face comint-highlight-input)))
+ (add-text-properties beg end
+ '( font-lock-face comint-highlight-input
+ front-sticky t )))
(unless comint-use-prompt-regexp
;; Give old user input a field property of `input', to
;; distinguish it from both process output and unsent