Mercurial > emacs
comparison lisp/font-lock.el @ 50588:7bfe36160365
(font-lock-preprocessor-face): New var and face.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 14 Apr 2003 15:04:16 +0000 |
| parents | 0ddc2f13992e |
| children | 09c07c654b23 |
comparison
equal
deleted
inserted
replaced
| 50587:f711c86ea5c9 | 50588:7bfe36160365 |
|---|---|
| 336 (defvar font-lock-constant-face 'font-lock-constant-face | 336 (defvar font-lock-constant-face 'font-lock-constant-face |
| 337 "Face name to use for constant and label names.") | 337 "Face name to use for constant and label names.") |
| 338 | 338 |
| 339 (defvar font-lock-warning-face 'font-lock-warning-face | 339 (defvar font-lock-warning-face 'font-lock-warning-face |
| 340 "Face name to use for things that should stand out.") | 340 "Face name to use for things that should stand out.") |
| 341 | |
| 342 (defvar font-lock-preprocessor-face 'font-lock-preprocessor-face | |
| 343 "Face name to use for preprocessor directives.") | |
| 341 | 344 |
| 342 (defvar font-lock-reference-face 'font-lock-constant-face) | 345 (defvar font-lock-reference-face 'font-lock-constant-face) |
| 343 (make-obsolete-variable 'font-lock-reference-face 'font-lock-constant-face) | 346 (make-obsolete-variable 'font-lock-reference-face 'font-lock-constant-face) |
| 344 | 347 |
| 345 ;; Fontification variables: | 348 ;; Fontification variables: |
| 1616 '((((type tty) (class color)) (:foreground "red")) | 1619 '((((type tty) (class color)) (:foreground "red")) |
| 1617 (((class color) (background light)) (:foreground "Red" :weight bold)) | 1620 (((class color) (background light)) (:foreground "Red" :weight bold)) |
| 1618 (((class color) (background dark)) (:foreground "Pink" :weight bold)) | 1621 (((class color) (background dark)) (:foreground "Pink" :weight bold)) |
| 1619 (t (:inverse-video t :weight bold))) | 1622 (t (:inverse-video t :weight bold))) |
| 1620 "Font Lock mode face used to highlight warnings." | 1623 "Font Lock mode face used to highlight warnings." |
| 1624 :group 'font-lock-highlighting-faces) | |
| 1625 | |
| 1626 (defface font-lock-preprocessor-face | |
| 1627 '((t :inherit 'font-lock-builtin-face)) | |
| 1628 "Font Lock mode face used to highlight preprocessor directives." | |
| 1621 :group 'font-lock-highlighting-faces) | 1629 :group 'font-lock-highlighting-faces) |
| 1622 | 1630 |
| 1623 ;;; End of Colour etc. support. | 1631 ;;; End of Colour etc. support. |
| 1624 | 1632 |
| 1625 ;;; Menu support. | 1633 ;;; Menu support. |