Mercurial > emacs
comparison lisp/textmodes/sgml-mode.el @ 62809:e38d2ae61b0a
(sgml-namespace-face): Specify customization group.
| author | Lute Kamstra <lute@gnu.org> |
|---|---|
| date | Fri, 27 May 2005 12:37:29 +0000 |
| parents | 9a8eaf5d664a |
| children | 33e854825b44 01137c1fdbe9 |
comparison
equal
deleted
inserted
replaced
| 62808:4bac6a268d13 | 62809:e38d2ae61b0a |
|---|---|
| 248 "Regular expression that matches a non-empty start tag. | 248 "Regular expression that matches a non-empty start tag. |
| 249 Any terminating `>' or `/' is not matched.") | 249 Any terminating `>' or `/' is not matched.") |
| 250 | 250 |
| 251 (defface sgml-namespace-face | 251 (defface sgml-namespace-face |
| 252 '((t (:inherit font-lock-builtin-face))) | 252 '((t (:inherit font-lock-builtin-face))) |
| 253 "`sgml-mode' face used to highlight the namespace part of identifiers.") | 253 "`sgml-mode' face used to highlight the namespace part of identifiers." |
| 254 :group 'sgml) | |
| 254 (defvar sgml-namespace-face 'sgml-namespace-face) | 255 (defvar sgml-namespace-face 'sgml-namespace-face) |
| 255 | 256 |
| 256 ;; internal | 257 ;; internal |
| 257 (defconst sgml-font-lock-keywords-1 | 258 (defconst sgml-font-lock-keywords-1 |
| 258 `((,(concat "<\\([!?]" sgml-name-re "\\)") 1 font-lock-keyword-face) | 259 `((,(concat "<\\([!?]" sgml-name-re "\\)") 1 font-lock-keyword-face) |