Mercurial > emacs
changeset 63226:33e854825b44
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-390
Remove "-face" suffix from sgml-namespace face
2005-06-10 Miles Bader <miles@gnu.org>
* lisp/textmodes/sgml-mode.el (sgml-namespace): Remove "-face" suffix
from face name.
(sgml-namespace-face): New backward-compatibility alias for
renamed face.
(sgml-namespace-face): Use renamed sgml-namespace face.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Fri, 10 Jun 2005 10:45:17 +0000 |
parents | 7660591a3c92 |
children | 6f4701bb40a7 |
files | lisp/ChangeLog lisp/textmodes/sgml-mode.el |
diffstat | 2 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Jun 10 10:44:55 2005 +0000 +++ b/lisp/ChangeLog Fri Jun 10 10:45:17 2005 +0000 @@ -1,5 +1,11 @@ 2005-06-10 Miles Bader <miles@gnu.org> + * textmodes/sgml-mode.el (sgml-namespace): Remove "-face" suffix + from face name. + (sgml-namespace-face): New backward-compatibility alias for + renamed face. + (sgml-namespace-face): Use renamed sgml-namespace face. + * textmodes/org.el (org-level-1, org-level-2, org-level-3) (org-level-4, org-level-5, org-level-6, org-level-7) (org-level-8, org-warning, org-headline-done)
--- a/lisp/textmodes/sgml-mode.el Fri Jun 10 10:44:55 2005 +0000 +++ b/lisp/textmodes/sgml-mode.el Fri Jun 10 10:45:17 2005 +0000 @@ -248,11 +248,13 @@ "Regular expression that matches a non-empty start tag. Any terminating `>' or `/' is not matched.") -(defface sgml-namespace-face +(defface sgml-namespace '((t (:inherit font-lock-builtin-face))) "`sgml-mode' face used to highlight the namespace part of identifiers." :group 'sgml) -(defvar sgml-namespace-face 'sgml-namespace-face) +;; backward-compatibility alias +(put 'sgml-namespace-face 'face-alias 'sgml-namespace) +(defvar sgml-namespace-face 'sgml-namespace) ;; internal (defconst sgml-font-lock-keywords-1