Fix unresolved implicit dependency of c_ppline.st state on c.st
[enscript.git] / states / hl / mail.st
1 /**
2  * Name: mail
3  * Description: Mail and news articles.
4  * Author: Originally by Markku Rossi <mtr@iki.fi>, heavily modified
5  * by Matthew Weigel <weigel@pitt.edu>
6  */
7
8 state mail_body extends Highlight
9 {
10   BEGIN {
11     reference_face (false);
12   }
13   /^[ \t]*>/ {
14     comment_face (true);
15     language_print ($0);
16     call (eat_one_line);
17     comment_face (false);
18   }
19 }
20
21 state mail_header extends Highlight
22 {
23   BEGIN {
24     reference_face (true);
25   }
26
27   END {
28     comment_face (true);
29   }
30   /:/ {
31     language_print ($0);
32     return;
33   }
34 }
35
36 state mail extends HighlightEntry
37 {
38   /^[ \t]*$/ {
39     /* Move to the mail body. */
40     call (mail_body);
41   }
42
43   /^/ {
44     reference_face (true);
45     language_print ($0);
46     call (mail_header);
47     comment_face (true);
48   }
49 }
50
51 \f
52 /*
53 Local variables:
54 mode: c
55 End:
56 */