summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBasil L. Contovounesios <contovob@tcd.ie>2020-08-19 12:37:03 +0100
committerBasil L. Contovounesios <contovob@tcd.ie>2020-08-19 12:47:51 +0100
commitbd3e2e848712bf4197000e02d832947b1f7928b6 (patch)
tree98d32cf9215d688ccfd1d01997b80d50808a4a86
parented96a2121de61390d7acce6f2f03521b47b7d978 (diff)
downloademacs-bd3e2e848712bf4197000e02d832947b1f7928b6.tar.gz
; Fix last change to comint.el
* lisp/comint.el (comint-highlight-input): Add :version tag. (comint-send-input): Fix indentation.
-rw-r--r--lisp/comint.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/comint.el b/lisp/comint.el
index 4094969ae8e..092902d865e 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -226,6 +226,7 @@ This variable is buffer-local."
(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)
@@ -1904,9 +1905,9 @@ Similarly for Soar, Scheme, etc."
(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