Index: emacs/lisp/font-lock.el
diff -c emacs/lisp/font-lock.el:1.238 emacs/lisp/font-lock.el:1.239
*** emacs/lisp/font-lock.el:1.238 Fri Apr 8 14:26:13 2005
--- emacs/lisp/font-lock.el Sat Apr 23 16:45:21 2005
***************
*** 309,314 ****
--- 309,317 ----
(defvar font-lock-comment-face 'font-lock-comment-face
"Face name to use for comments.")
+ (defvar font-lock-comment-delimiter-face 'font-lock-comment-delimiter-face
+ "Face name to use for comments.")
+
(defvar font-lock-string-face 'font-lock-string-face
"Face name to use for strings.")
***************
*** 1615,1621 ****
;; 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-face
'((((class grayscale) (background light))
(:foreground "DimGray" :weight bold :slant italic))
(((class grayscale) (background dark))
--- 1618,1624 ----
;; 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))
***************
*** 1636,1641 ****
--- 1639,1665 ----
"Font Lock mode face used to highlight comments."
:group 'font-lock-highlighting-faces)
+ (defface font-lock-comment-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))
+ )
+ (((class color) (min-colors 8) (background dark))
+ )
+ (t (:weight bold :slant italic)))
+ "Font Lock mode face used to highlight comments."
+ :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))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
