diff options
| author | Juri Linkov | 2005-09-29 22:58:48 +0000 |
|---|---|---|
| committer | Juri Linkov | 2005-09-29 22:58:48 +0000 |
| commit | fa6674e31fb675363d4d7cc63f75f82ee69ad0b6 (patch) | |
| tree | 78956853e64299d89f3bb6431b967cb60d4a9fbe | |
| parent | da7422052c34089aedccd17fc864ebe1cd4c759c (diff) | |
| download | emacs-fa6674e31fb675363d4d7cc63f75f82ee69ad0b6.tar.gz emacs-fa6674e31fb675363d4d7cc63f75f82ee69ad0b6.zip | |
(vhdl-font-lock-prompt-face)
(vhdl-font-lock-attribute-face, vhdl-font-lock-enumvalue-face)
(vhdl-font-lock-function-face, vhdl-font-lock-directive-face)
(vhdl-font-lock-reserved-words-face)
(vhdl-font-lock-translate-off-face, syntax-alist): Remove group
`font-lock-highlighting-faces'.
| -rw-r--r-- | lisp/progmodes/vhdl-mode.el | 24 |
1 files changed, 8 insertions, 16 deletions
diff --git a/lisp/progmodes/vhdl-mode.el b/lisp/progmodes/vhdl-mode.el index 04ddf7b8fcd..1986148e8d5 100644 --- a/lisp/progmodes/vhdl-mode.el +++ b/lisp/progmodes/vhdl-mode.el | |||
| @@ -12832,40 +12832,35 @@ This does background highlighting of translate-off regions.") | |||
| 12832 | (((class color) (background dark)) (:foreground "Pink" :bold t)) | 12832 | (((class color) (background dark)) (:foreground "Pink" :bold t)) |
| 12833 | (t (:inverse-video t))) | 12833 | (t (:inverse-video t))) |
| 12834 | "Font lock mode face used to highlight prompts." | 12834 | "Font lock mode face used to highlight prompts." |
| 12835 | :group 'vhdl-highlight-faces | 12835 | :group 'vhdl-highlight-faces) |
| 12836 | :group 'font-lock-highlighting-faces) | ||
| 12837 | 12836 | ||
| 12838 | (defface vhdl-font-lock-attribute-face | 12837 | (defface vhdl-font-lock-attribute-face |
| 12839 | '((((class color) (background light)) (:foreground "Orchid")) | 12838 | '((((class color) (background light)) (:foreground "Orchid")) |
| 12840 | (((class color) (background dark)) (:foreground "LightSteelBlue")) | 12839 | (((class color) (background dark)) (:foreground "LightSteelBlue")) |
| 12841 | (t (:italic t :bold t))) | 12840 | (t (:italic t :bold t))) |
| 12842 | "Font lock mode face used to highlight standardized attributes." | 12841 | "Font lock mode face used to highlight standardized attributes." |
| 12843 | :group 'vhdl-highlight-faces | 12842 | :group 'vhdl-highlight-faces) |
| 12844 | :group 'font-lock-highlighting-faces) | ||
| 12845 | 12843 | ||
| 12846 | (defface vhdl-font-lock-enumvalue-face | 12844 | (defface vhdl-font-lock-enumvalue-face |
| 12847 | '((((class color) (background light)) (:foreground "SaddleBrown")) | 12845 | '((((class color) (background light)) (:foreground "SaddleBrown")) |
| 12848 | (((class color) (background dark)) (:foreground "BurlyWood")) | 12846 | (((class color) (background dark)) (:foreground "BurlyWood")) |
| 12849 | (t (:italic t :bold t))) | 12847 | (t (:italic t :bold t))) |
| 12850 | "Font lock mode face used to highlight standardized enumeration values." | 12848 | "Font lock mode face used to highlight standardized enumeration values." |
| 12851 | :group 'vhdl-highlight-faces | 12849 | :group 'vhdl-highlight-faces) |
| 12852 | :group 'font-lock-highlighting-faces) | ||
| 12853 | 12850 | ||
| 12854 | (defface vhdl-font-lock-function-face | 12851 | (defface vhdl-font-lock-function-face |
| 12855 | '((((class color) (background light)) (:foreground "Cyan4")) | 12852 | '((((class color) (background light)) (:foreground "Cyan4")) |
| 12856 | (((class color) (background dark)) (:foreground "Orchid1")) | 12853 | (((class color) (background dark)) (:foreground "Orchid1")) |
| 12857 | (t (:italic t :bold t))) | 12854 | (t (:italic t :bold t))) |
| 12858 | "Font lock mode face used to highlight standardized functions and packages." | 12855 | "Font lock mode face used to highlight standardized functions and packages." |
| 12859 | :group 'vhdl-highlight-faces | 12856 | :group 'vhdl-highlight-faces) |
| 12860 | :group 'font-lock-highlighting-faces) | ||
| 12861 | 12857 | ||
| 12862 | (defface vhdl-font-lock-directive-face | 12858 | (defface vhdl-font-lock-directive-face |
| 12863 | '((((class color) (background light)) (:foreground "CadetBlue")) | 12859 | '((((class color) (background light)) (:foreground "CadetBlue")) |
| 12864 | (((class color) (background dark)) (:foreground "Aquamarine")) | 12860 | (((class color) (background dark)) (:foreground "Aquamarine")) |
| 12865 | (t (:italic t :bold t))) | 12861 | (t (:italic t :bold t))) |
| 12866 | "Font lock mode face used to highlight directives." | 12862 | "Font lock mode face used to highlight directives." |
| 12867 | :group 'vhdl-highlight-faces | 12863 | :group 'vhdl-highlight-faces) |
| 12868 | :group 'font-lock-highlighting-faces) | ||
| 12869 | 12864 | ||
| 12870 | (defface vhdl-font-lock-reserved-words-face | 12865 | (defface vhdl-font-lock-reserved-words-face |
| 12871 | '((((class color) (background light)) (:foreground "Orange" :bold t)) | 12866 | '((((class color) (background light)) (:foreground "Orange" :bold t)) |
| @@ -12874,16 +12869,14 @@ This does background highlighting of translate-off regions.") | |||
| 12874 | (((class color) (background dark)) (:foreground "Yellow" :bold t)) | 12869 | (((class color) (background dark)) (:foreground "Yellow" :bold t)) |
| 12875 | (t ())) | 12870 | (t ())) |
| 12876 | "Font lock mode face used to highlight additional reserved words." | 12871 | "Font lock mode face used to highlight additional reserved words." |
| 12877 | :group 'vhdl-highlight-faces | 12872 | :group 'vhdl-highlight-faces) |
| 12878 | :group 'font-lock-highlighting-faces) | ||
| 12879 | 12873 | ||
| 12880 | (defface vhdl-font-lock-translate-off-face | 12874 | (defface vhdl-font-lock-translate-off-face |
| 12881 | '((((class color) (background light)) (:background "LightGray")) | 12875 | '((((class color) (background light)) (:background "LightGray")) |
| 12882 | (((class color) (background dark)) (:background "DimGray")) | 12876 | (((class color) (background dark)) (:background "DimGray")) |
| 12883 | (t ())) | 12877 | (t ())) |
| 12884 | "Font lock mode face used to background highlight translate-off regions." | 12878 | "Font lock mode face used to background highlight translate-off regions." |
| 12885 | :group 'vhdl-highlight-faces | 12879 | :group 'vhdl-highlight-faces) |
| 12886 | :group 'font-lock-highlighting-faces) | ||
| 12887 | 12880 | ||
| 12888 | ;; font lock mode faces used to highlight words with special syntax. | 12881 | ;; font lock mode faces used to highlight words with special syntax. |
| 12889 | (let ((syntax-alist vhdl-special-syntax-alist)) | 12882 | (let ((syntax-alist vhdl-special-syntax-alist)) |
| @@ -12897,8 +12890,7 @@ This does background highlighting of translate-off regions.") | |||
| 12897 | (t ())) | 12890 | (t ())) |
| 12898 | ,(concat "Font lock mode face used to highlight " | 12891 | ,(concat "Font lock mode face used to highlight " |
| 12899 | (nth 0 (car syntax-alist)) ".") | 12892 | (nth 0 (car syntax-alist)) ".") |
| 12900 | :group 'vhdl-highlight-faces | 12893 | :group 'vhdl-highlight-faces)) |
| 12901 | :group 'font-lock-highlighting-faces)) | ||
| 12902 | (setq syntax-alist (cdr syntax-alist)))) | 12894 | (setq syntax-alist (cdr syntax-alist)))) |
| 12903 | 12895 | ||
| 12904 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 12896 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |