(font-lock-comment-delimiter-face): Inherit from

font-lock-comment-face rather than copying its setting.

2 files changed, 10 insertions, 21 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6f298bace3e..0c25bc236d6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-05-12  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * font-lock.el (font-lock-comment-delimiter-face): Inherit from
+        font-lock-comment-face rather than copying its setting.
+
 2005-05-12  Andreas Schwab  <schwab@suse.de>
 
         * eshell/esh-mode.el (eshell-send-input): Doc fix.
diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 1657400fe77..006d8713f9a 100644
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1655,27 +1655,6 @@ Sets various variables using `font-lock-defaults' (or, if nil, using
 
 ;; 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 @@ Sets various variables using `font-lock-defaults' (or, if nil, using
   "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))