From d6f0f3e06926125ab9570ee66e49da7c788dbbd1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 27 Dec 2005 01:11:01 +0000 Subject: [PATCH] (paren-showing-faces): New group. (show-paren-match, show-paren-mismatch): Move to that group. --- lisp/ChangeLog | 7 +++++++ lisp/paren.el | 12 ++++++++---- 2 files changed, 15 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 174e9d71bf1..2798afaaf35 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,12 @@ 2005-12-26 Richard M. Stallman + * paren.el (paren-showing-faces): New group. + (show-paren-match, show-paren-mismatch): Move to that group. + + * button.el (button): Put into group `basic-faces'. + + * progmodes/make-mode.el: Remove faces from group `faces'. + * apropos.el (apropos, apropos-value): Doc fix. (apropos-documentation): Doc fix. diff --git a/lisp/paren.el b/lisp/paren.el index 2164ac72d39..f5327c3b344 100644 --- a/lisp/paren.el +++ b/lisp/paren.el @@ -72,6 +72,12 @@ otherwise)." :group 'paren-showing :version "20.3") +(defgroup paren-showing-faces () + "Group for faces of Show Paren mode" + :group 'paren-showing + :group 'faces + :version "22.1") + (defface show-paren-match '((((class color) (background light)) :background "turquoise") ; looks OK on tty (becomes cyan) @@ -82,8 +88,7 @@ otherwise)." (t :background "gray")) "Show Paren mode face used for a matching paren." - :group 'faces - :group 'paren-showing) + :group 'show-paren-faces) ;; backward-compatibility alias (put 'show-paren-match-face 'face-alias 'show-paren-match) @@ -91,8 +96,7 @@ otherwise)." '((((class color)) (:foreground "white" :background "purple")) (t (:inverse-video t))) "Show Paren mode face used for a mismatching paren." - :group 'faces - :group 'paren-showing) + :group 'show-paren-faces) ;; backward-compatibility alias (put 'show-paren-mismatch-face 'face-alias 'show-paren-mismatch) -- 2.39.5