(file) Return to default_faces.st CVS log (file) (dir) Up to [RizwankCVS] / testProject / share / enscript / hl

 1 rizwank 1.1 /*
 2              * Initialize the default faces.
 3              */
 4             
 5             sub make_face(ps_font_name, boldp, italicp)
 6             {
 7               return list(ps_font_name, boldp, italicp, 0, 0);
 8             }
 9             
10             fontname	= 0;
11             boldp		= 1;
12             italicp		= 2;
13             fg_color	= 3;
14             bg_color	= 4;
15             
16             state default_faces
17             {
18               BEGIN {
19                 face_bold 		= make_face(bold_font, 1, 0);
20                 face_italic		= make_face(italic_font, 0, 1);
21                 face_bold_italic	= make_face(bold_italic_font, 1, 1);
22 rizwank 1.1     face_comment	= make_face(italic_font, 0, 1);
23                 face_function_name	= make_face(bold_font, 1, 0);
24             
25                 if (color)
26                   face_variable_name	= make_face(font, 0, 0);
27                 else
28                   face_variable_name	= make_face(bold_font, 1, 0);
29             
30                 face_keyword	= make_face(bold_font, 1, 0);
31                 face_reference	= make_face(bold_font, 1, 0);
32                 face_string		= make_face(bold_font, 1, 0);
33                 face_builtin	= make_face(bold_font, 1, 0);
34                 face_type		= make_face(bold_font, 1, 0);
35                 face_highlight	= make_face(font, 0, 0);
36             
37                 return;
38               }
39             }
40             
41             
42             /*
43 rizwank 1.1 Local variables:
44             mode: c
45             End:
46             */

Rizwan Kassim
Powered by
ViewCVS 0.9.2