diff options
| -rw-r--r-- | lisp/font-lock.el | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 398b7fef064..b3a4a80e04a 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el | |||
| @@ -216,7 +216,7 @@ | |||
| 216 | :link '(custom-manual "(elisp)Font Lock Mode") | 216 | :link '(custom-manual "(elisp)Font Lock Mode") |
| 217 | :group 'faces) | 217 | :group 'faces) |
| 218 | 218 | ||
| 219 | (defgroup font-lock-highlighting-faces nil | 219 | (defgroup font-lock-faces nil |
| 220 | "Faces for highlighting text." | 220 | "Faces for highlighting text." |
| 221 | :prefix "font-lock-" | 221 | :prefix "font-lock-" |
| 222 | :group 'font-lock) | 222 | :group 'font-lock) |
| @@ -1667,7 +1667,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1667 | ) | 1667 | ) |
| 1668 | (t (:weight bold :slant italic))) | 1668 | (t (:weight bold :slant italic))) |
| 1669 | "Font Lock mode face used to highlight comments." | 1669 | "Font Lock mode face used to highlight comments." |
| 1670 | :group 'font-lock-highlighting-faces) | 1670 | :group 'font-lock-faces) |
| 1671 | 1671 | ||
| 1672 | (defface font-lock-comment-delimiter-face | 1672 | (defface font-lock-comment-delimiter-face |
| 1673 | '((default :inherit font-lock-comment-face) | 1673 | '((default :inherit font-lock-comment-face) |
| @@ -1678,7 +1678,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1678 | (((class color) (min-colors 8) (background dark)) | 1678 | (((class color) (min-colors 8) (background dark)) |
| 1679 | :foreground "red1")) | 1679 | :foreground "red1")) |
| 1680 | "Font Lock mode face used to highlight comment delimiters." | 1680 | "Font Lock mode face used to highlight comment delimiters." |
| 1681 | :group 'font-lock-highlighting-faces) | 1681 | :group 'font-lock-faces) |
| 1682 | 1682 | ||
| 1683 | (defface font-lock-string-face | 1683 | (defface font-lock-string-face |
| 1684 | '((((class grayscale) (background light)) (:foreground "DimGray" :slant italic)) | 1684 | '((((class grayscale) (background light)) (:foreground "DimGray" :slant italic)) |
| @@ -1690,12 +1690,12 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1690 | (((class color) (min-colors 8)) (:foreground "green")) | 1690 | (((class color) (min-colors 8)) (:foreground "green")) |
| 1691 | (t (:slant italic))) | 1691 | (t (:slant italic))) |
| 1692 | "Font Lock mode face used to highlight strings." | 1692 | "Font Lock mode face used to highlight strings." |
| 1693 | :group 'font-lock-highlighting-faces) | 1693 | :group 'font-lock-faces) |
| 1694 | 1694 | ||
| 1695 | (defface font-lock-doc-face | 1695 | (defface font-lock-doc-face |
| 1696 | '((t :inherit font-lock-string-face)) | 1696 | '((t :inherit font-lock-string-face)) |
| 1697 | "Font Lock mode face used to highlight documentation." | 1697 | "Font Lock mode face used to highlight documentation." |
| 1698 | :group 'font-lock-highlighting-faces) | 1698 | :group 'font-lock-faces) |
| 1699 | 1699 | ||
| 1700 | (defface font-lock-keyword-face | 1700 | (defface font-lock-keyword-face |
| 1701 | '((((class grayscale) (background light)) (:foreground "LightGray" :weight bold)) | 1701 | '((((class grayscale) (background light)) (:foreground "LightGray" :weight bold)) |
| @@ -1707,7 +1707,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1707 | (((class color) (min-colors 8)) (:foreground "cyan" :weight bold)) | 1707 | (((class color) (min-colors 8)) (:foreground "cyan" :weight bold)) |
| 1708 | (t (:weight bold))) | 1708 | (t (:weight bold))) |
| 1709 | "Font Lock mode face used to highlight keywords." | 1709 | "Font Lock mode face used to highlight keywords." |
| 1710 | :group 'font-lock-highlighting-faces) | 1710 | :group 'font-lock-faces) |
| 1711 | 1711 | ||
| 1712 | (defface font-lock-builtin-face | 1712 | (defface font-lock-builtin-face |
| 1713 | '((((class grayscale) (background light)) (:foreground "LightGray" :weight bold)) | 1713 | '((((class grayscale) (background light)) (:foreground "LightGray" :weight bold)) |
| @@ -1719,7 +1719,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1719 | (((class color) (min-colors 8)) (:foreground "blue" :weight bold)) | 1719 | (((class color) (min-colors 8)) (:foreground "blue" :weight bold)) |
| 1720 | (t (:weight bold))) | 1720 | (t (:weight bold))) |
| 1721 | "Font Lock mode face used to highlight builtins." | 1721 | "Font Lock mode face used to highlight builtins." |
| 1722 | :group 'font-lock-highlighting-faces) | 1722 | :group 'font-lock-faces) |
| 1723 | 1723 | ||
| 1724 | (defface font-lock-function-name-face | 1724 | (defface font-lock-function-name-face |
| 1725 | '((((class color) (min-colors 88) (background light)) (:foreground "Blue1")) | 1725 | '((((class color) (min-colors 88) (background light)) (:foreground "Blue1")) |
| @@ -1729,7 +1729,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1729 | (((class color) (min-colors 8)) (:foreground "blue" :weight bold)) | 1729 | (((class color) (min-colors 8)) (:foreground "blue" :weight bold)) |
| 1730 | (t (:inverse-video t :weight bold))) | 1730 | (t (:inverse-video t :weight bold))) |
| 1731 | "Font Lock mode face used to highlight function names." | 1731 | "Font Lock mode face used to highlight function names." |
| 1732 | :group 'font-lock-highlighting-faces) | 1732 | :group 'font-lock-faces) |
| 1733 | 1733 | ||
| 1734 | (defface font-lock-variable-name-face | 1734 | (defface font-lock-variable-name-face |
| 1735 | '((((class grayscale) (background light)) | 1735 | '((((class grayscale) (background light)) |
| @@ -1743,7 +1743,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1743 | (((class color) (min-colors 8)) (:foreground "yellow" :weight light)) | 1743 | (((class color) (min-colors 8)) (:foreground "yellow" :weight light)) |
| 1744 | (t (:weight bold :slant italic))) | 1744 | (t (:weight bold :slant italic))) |
| 1745 | "Font Lock mode face used to highlight variable names." | 1745 | "Font Lock mode face used to highlight variable names." |
| 1746 | :group 'font-lock-highlighting-faces) | 1746 | :group 'font-lock-faces) |
| 1747 | 1747 | ||
| 1748 | (defface font-lock-type-face | 1748 | (defface font-lock-type-face |
| 1749 | '((((class grayscale) (background light)) (:foreground "Gray90" :weight bold)) | 1749 | '((((class grayscale) (background light)) (:foreground "Gray90" :weight bold)) |
| @@ -1755,7 +1755,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1755 | (((class color) (min-colors 8)) (:foreground "green")) | 1755 | (((class color) (min-colors 8)) (:foreground "green")) |
| 1756 | (t (:weight bold :underline t))) | 1756 | (t (:weight bold :underline t))) |
| 1757 | "Font Lock mode face used to highlight type and classes." | 1757 | "Font Lock mode face used to highlight type and classes." |
| 1758 | :group 'font-lock-highlighting-faces) | 1758 | :group 'font-lock-faces) |
| 1759 | 1759 | ||
| 1760 | (defface font-lock-constant-face | 1760 | (defface font-lock-constant-face |
| 1761 | '((((class grayscale) (background light)) | 1761 | '((((class grayscale) (background light)) |
| @@ -1769,7 +1769,7 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1769 | (((class color) (min-colors 8)) (:foreground "magenta")) | 1769 | (((class color) (min-colors 8)) (:foreground "magenta")) |
| 1770 | (t (:weight bold :underline t))) | 1770 | (t (:weight bold :underline t))) |
| 1771 | "Font Lock mode face used to highlight constants and labels." | 1771 | "Font Lock mode face used to highlight constants and labels." |
| 1772 | :group 'font-lock-highlighting-faces) | 1772 | :group 'font-lock-faces) |
| 1773 | 1773 | ||
| 1774 | (defface font-lock-warning-face | 1774 | (defface font-lock-warning-face |
| 1775 | '((((class color) (min-colors 88) (background light)) (:foreground "Red1" :weight bold)) | 1775 | '((((class color) (min-colors 88) (background light)) (:foreground "Red1" :weight bold)) |
| @@ -1779,27 +1779,27 @@ Sets various variables using `font-lock-defaults' (or, if nil, using | |||
| 1779 | (((class color) (min-colors 8)) (:foreground "red")) | 1779 | (((class color) (min-colors 8)) (:foreground "red")) |
| 1780 | (t (:inverse-video t :weight bold))) | 1780 | (t (:inverse-video t :weight bold))) |
| 1781 | "Font Lock mode face used to highlight warnings." | 1781 | "Font Lock mode face used to highlight warnings." |
| 1782 | :group 'font-lock-highlighting-faces) | 1782 | :group 'font-lock-faces) |
| 1783 | 1783 | ||
| 1784 | (defface font-lock-negation-char-face | 1784 | (defface font-lock-negation-char-face |
| 1785 | '((t nil)) | 1785 | '((t nil)) |
| 1786 | "Font Lock mode face used to highlight easy to overlook negation." | 1786 | "Font Lock mode face used to highlight easy to overlook negation." |
| 1787 | :group 'font-lock-highlighting-faces) | 1787 | :group 'font-lock-faces) |
| 1788 | 1788 | ||
| 1789 | (defface font-lock-preprocessor-face | 1789 | (defface font-lock-preprocessor-face |
| 1790 | '((t :inherit font-lock-builtin-face)) | 1790 | '((t :inherit font-lock-builtin-face)) |
| 1791 | "Font Lock mode face used to highlight preprocessor directives." | 1791 | "Font Lock mode face used to highlight preprocessor directives." |
| 1792 | :group 'font-lock-highlighting-faces) | 1792 | :group 'font-lock-faces) |
| 1793 | 1793 | ||
| 1794 | (defface font-lock-regexp-grouping-backslash | 1794 | (defface font-lock-regexp-grouping-backslash |
| 1795 | '((t :inherit bold)) | 1795 | '((t :inherit bold)) |
| 1796 | "Font Lock mode face for backslashes in Lisp regexp grouping constructs." | 1796 | "Font Lock mode face for backslashes in Lisp regexp grouping constructs." |
| 1797 | :group 'font-lock-highlighting-faces) | 1797 | :group 'font-lock-faces) |
| 1798 | 1798 | ||
| 1799 | (defface font-lock-regexp-grouping-construct | 1799 | (defface font-lock-regexp-grouping-construct |
| 1800 | '((t :inherit bold)) | 1800 | '((t :inherit bold)) |
| 1801 | "Font Lock mode face used to highlight grouping constructs in Lisp regexps." | 1801 | "Font Lock mode face used to highlight grouping constructs in Lisp regexps." |
| 1802 | :group 'font-lock-highlighting-faces) | 1802 | :group 'font-lock-faces) |
| 1803 | 1803 | ||
| 1804 | ;;; End of Colour etc. support. | 1804 | ;;; End of Colour etc. support. |
| 1805 | 1805 | ||