summaryrefslogtreecommitdiff
path: root/lisp/faces.el
diff options
context:
space:
mode:
authorFelipe Ochoa <felipe@fov.space>2017-08-18 12:05:12 +0300
committerEli Zaretskii <eliz@gnu.org>2017-08-18 12:05:12 +0300
commitfb1a489757eb9237afbd2e39e453e4a5e06c9d86 (patch)
treee7586e197cdfbc145710fcbc07da682199a5c091 /lisp/faces.el
parent99b3250d04288260e3a6db864cda910d8093bee1 (diff)
downloademacs-fb1a489757eb9237afbd2e39e453e4a5e06c9d86.tar.gz
A new face for show-paren in expression mode
* lisp/faces.el (show-paren-match-expression): Define the new face. * lisp/paren.el (show-paren-function): Apply the different face when in expression mode. (Bug#28047) Copyright-paperwork-exempt: yes
Diffstat (limited to 'lisp/faces.el')
-rw-r--r--lisp/faces.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index 01d94d7aae0..d9c90fda6be 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2854,6 +2854,13 @@ It is used for characters of no fonts too."
"Face used for a matching paren."
:group 'paren-showing-faces)
+(defface show-paren-match-expression
+ '((t :inherit show-paren-match))
+ "Face used for a matching paren when highlighting the whole expression.
+This face is used by `show-paren-mode'."
+ :group 'paren-showing-faces
+ :version "26.1")
+
(defface show-paren-mismatch
'((((class color)) (:foreground "white" :background "purple"))
(t (:inverse-video t)))