Mercurial > emacs
changeset 62264:01b87ce19664
(font-lock-comment-delimiter-face): Inherit from
font-lock-comment-face rather than copying its setting.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 12 May 2005 20:04:09 +0000 |
parents | 7177e4f9a5e1 |
children | 43e264259629 |
files | lisp/font-lock.el |
diffstat | 1 files changed, 5 insertions(+), 21 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/font-lock.el Thu May 12 14:12:25 2005 +0000 +++ b/lisp/font-lock.el Thu May 12 20:04:09 2005 +0000 @@ -1655,27 +1655,6 @@ ;; But now we do it the custom way. Note that `defface' will not overwrite any ;; faces declared above via `custom-declare-face'. -(defface font-lock-comment-delimiter-face - '((((class grayscale) (background light)) - (:foreground "DimGray" :weight bold :slant italic)) - (((class grayscale) (background dark)) - (:foreground "LightGray" :weight bold :slant italic)) - (((class color) (min-colors 88) (background light)) - (:foreground "Firebrick")) - (((class color) (min-colors 88) (background dark)) - (:foreground "chocolate1")) - (((class color) (min-colors 16) (background light)) - (:foreground "red")) - (((class color) (min-colors 16) (background dark)) - (:foreground "red1")) - (((class color) (min-colors 8) (background light)) - (:foreground "red")) - (((class color) (min-colors 8) (background dark)) - (:foreground "red1")) - (t (:weight bold :slant italic))) - "Font Lock mode face used to highlight comment delimiters." - :group 'font-lock-highlighting-faces) - (defface font-lock-comment-face '((((class grayscale) (background light)) (:foreground "DimGray" :weight bold :slant italic)) @@ -1697,6 +1676,11 @@ "Font Lock mode face used to highlight comments." :group 'font-lock-highlighting-faces) +(defface font-lock-comment-delimiter-face + '((t :inherit font-lock-comment-face)) + "Font Lock mode face used to highlight comment delimiters." + :group 'font-lock-highlighting-faces) + (defface font-lock-string-face '((((class grayscale) (background light)) (:foreground "DimGray" :slant italic)) (((class grayscale) (background dark)) (:foreground "LightGray" :slant italic))