diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-12-27 01:11:01 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-12-27 01:11:01 +0000 |
| commit | d6f0f3e06926125ab9570ee66e49da7c788dbbd1 (patch) | |
| tree | 3ed453438fb7b439842cf71180cd8c610b5a1d58 /lisp | |
| parent | 21b9448f562427ad1869ba0ff756cb5a9d092b38 (diff) | |
| download | emacs-d6f0f3e06926125ab9570ee66e49da7c788dbbd1.tar.gz emacs-d6f0f3e06926125ab9570ee66e49da7c788dbbd1.tar.bz2 emacs-d6f0f3e06926125ab9570ee66e49da7c788dbbd1.zip | |
(paren-showing-faces): New group.
(show-paren-match, show-paren-mismatch): Move to that group.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | 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 <rms@gnu.org> + * 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) |