Small change to getopt stuff
[enscript.git] / states / hl / style_a2ps.st
1
2 state style_a2ps
3 {
4   BEGIN {
5     call (default_faces);
6
7     /* Fonts. */
8     face_type =                         make_face (italic_font, 0, 1);
9     face_string =                       make_face ("Times-Roman", 0, 0);
10
11     if (color)
12       {
13         /* Set colors. */
14         /* These are incomplete. */
15         face_bold[fg_color] =           language_color ("black");
16         face_italic[fg_color] =         language_color ("black");
17         face_bold_italic[fg_color] =    language_color ("black");
18         face_comment[fg_color] =        language_color ("red");
19         face_function_name[fg_color] =  language_color ("blue");
20         face_variable_name[fg_color] =  language_color ("dark goldenrod");
21         face_keyword[fg_color] =        language_color ("purple");
22         face_reference[fg_color] =      language_color ("cadet blue");
23         face_string[fg_color] =         language_color ("forest green");
24         face_builtin[fg_color] =        language_color ("orchid");
25       }
26     else
27       {
28         /* Highlighting for b&w / grayscale outputs. */
29         face_comment[bg_color] =                language_color ("gray90");
30       }
31
32     return;
33   }
34 }
35
36 \f
37 /*
38 Local variables:
39 mode: c
40 End:
41 */