comparison lisp/font-lock.el @ 55062:44fb4d4fdf7b

(font-lock-preprocessor-face): Remove spurious quote. (font-lock-warning-face): Fix spacing.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 21 Apr 2004 21:00:33 +0000
parents 3531a87207b5
children 217a5e37c700 2ccd88cfde01
comparison
equal deleted inserted replaced
55061:966081800217 55062:44fb4d4fdf7b
1560 (defface font-lock-comment-face 1560 (defface font-lock-comment-face
1561 '((((class grayscale) (background light)) 1561 '((((class grayscale) (background light))
1562 (:foreground "DimGray" :weight bold :slant italic)) 1562 (:foreground "DimGray" :weight bold :slant italic))
1563 (((class grayscale) (background dark)) 1563 (((class grayscale) (background dark))
1564 (:foreground "LightGray" :weight bold :slant italic)) 1564 (:foreground "LightGray" :weight bold :slant italic))
1565 (((class color) (min-colors 88) (background light)) 1565 (((class color) (min-colors 88) (background light))
1566 (:foreground "Firebrick")) 1566 (:foreground "Firebrick"))
1567 (((class color) (min-colors 88) (background dark)) 1567 (((class color) (min-colors 88) (background dark))
1568 (:foreground "chocolate1")) 1568 (:foreground "chocolate1"))
1569 (((class color) (min-colors 16) (background light)) 1569 (((class color) (min-colors 16) (background light))
1570 (:foreground "red")) 1570 (:foreground "red"))
1571 (((class color) (min-colors 16) (background dark)) 1571 (((class color) (min-colors 16) (background dark))
1572 (:foreground "red1")) 1572 (:foreground "red1"))
1573 (((class color) (min-colors 8) (background light)) 1573 (((class color) (min-colors 8) (background light))
1574 (:foreground "red")) 1574 (:foreground "red"))
1575 (((class color) (min-colors 8) (background dark)) 1575 (((class color) (min-colors 8) (background dark))
1576 (:foreground "red1")) 1576 (:foreground "red1"))
1577 (t (:weight bold :slant italic))) 1577 (t (:weight bold :slant italic)))
1578 "Font Lock mode face used to highlight comments." 1578 "Font Lock mode face used to highlight comments."
1579 :group 'font-lock-highlighting-faces) 1579 :group 'font-lock-highlighting-faces)
1580 1580
1671 1671
1672 (defface font-lock-warning-face 1672 (defface font-lock-warning-face
1673 '((((class color) (min-colors 88) (background light)) (:foreground "Red" :weight bold)) 1673 '((((class color) (min-colors 88) (background light)) (:foreground "Red" :weight bold))
1674 (((class color) (min-colors 88) (background dark)) (:foreground "Pink" :weight bold)) 1674 (((class color) (min-colors 88) (background dark)) (:foreground "Pink" :weight bold))
1675 (((class color) (min-colors 16) (background light)) (:foreground "Red" :weight bold)) 1675 (((class color) (min-colors 16) (background light)) (:foreground "Red" :weight bold))
1676 (((class color) (min-colors 16) (background dark)) (:foreground "Pink" :weight bold)) (((class color) (min-colors 8)) (:foreground "red")) 1676 (((class color) (min-colors 16) (background dark)) (:foreground "Pink" :weight bold))
1677 (((class color) (min-colors 8)) (:foreground "red"))
1677 (t (:inverse-video t :weight bold))) 1678 (t (:inverse-video t :weight bold)))
1678 "Font Lock mode face used to highlight warnings." 1679 "Font Lock mode face used to highlight warnings."
1679 :group 'font-lock-highlighting-faces) 1680 :group 'font-lock-highlighting-faces)
1680 1681
1681 (defface font-lock-preprocessor-face 1682 (defface font-lock-preprocessor-face
1682 '((t :inherit 'font-lock-builtin-face)) 1683 '((t :inherit font-lock-builtin-face))
1683 "Font Lock mode face used to highlight preprocessor directives." 1684 "Font Lock mode face used to highlight preprocessor directives."
1684 :group 'font-lock-highlighting-faces) 1685 :group 'font-lock-highlighting-faces)
1685 1686
1686 ;;; End of Colour etc. support. 1687 ;;; End of Colour etc. support.
1687 1688