mail.jsf (2858B)
1 # JOE syntax highlight file for typical UNIX mail files 2 # 2004-04-25 Tomas Szepe <szepe@pinerecords.com> 3 4 # Improved to handle quote characters commonly seen on Usenet, and 5 # highlighting of the more frequently edited mail and news headers, with 6 # some sanity checking of the same. 7 # 2004-06-26 Jeff Hurwit <darkmoon@verizon.net> 8 9 - 10 11 =Idle 12 =Head bold 13 =HdTo red bg_white 14 =HdFrom bold red 15 =HdSbj bold magenta 16 =HdDate bold 17 =HdRRT black bg_white 18 =HdGrp bold white bg_red 19 =HdFuT bold red bg_yellow 20 =HdBad bold red 21 =Quot1 green bg_white 22 =Quot2 bold blue bg_white 23 =Sign bold magenta 24 25 # Start in headers. We know we're out at the first blank line. 26 27 :first Idle 28 * hbol noeat 29 "\n" newline 30 ">|:~}#]" newline noeat 31 32 # Require header 33 # "\n" nohead 34 35 :nohead HdBad 36 * nohead 37 38 :hbol Idle 39 * hbad recolor=-1 40 "\n" newline 41 "A-Z" bufhdrs buffer 42 "-" newline noeat 43 44 :hbad HdBad 45 * hbad 46 "\n" hbol 47 48 :hlbad HdBad 49 * hbol 50 51 :bufhdrs Idle 52 * hbad recolor=-1 53 "\n" hlbad noeat recolor=-2 54 "-_a-zA-Z0-9" bufhdrs 55 ":" headers hold 56 57 :headers Idle 58 * hbad recolor=-1 59 " \n" hnocolor noeat strings 60 "To" hsto recolor=-2 61 "Cc" hsto recolor=-2 62 "Bcc" hsto recolor=-2 63 "From" hsfrom recolor=-2 64 "Subject" hssbj recolor=-2 65 "Date" hsdate recolor=-2 66 "Return-Receipt-To" hsrrecp recolor=-2 67 "Newsgroups" hsgroups recolor=-2 68 "Followup-To" hsfolup recolor=-2 69 done 70 71 :hnocolor Idle 72 * hnocolor 73 "\n" cont_nocolor 74 75 :cont_nocolor Idle 76 * hbol noeat 77 " \t" hnocolor recolor=-1 78 79 :hsto Head 80 * hto 81 "\n" hbol 82 83 :hto HdTo 84 * hto 85 "\n" cont_to 86 87 :cont_to HdTo 88 * hbol noeat 89 " \t" hto recolor=-1 90 91 :hsfrom Head 92 * hfrom 93 "\n" hbol 94 95 :hfrom HdFrom 96 * hfrom 97 "\n" hbol 98 99 :hssbj Head 100 * hsbj 101 "\n" hbol 102 103 :hsbj HdSbj 104 * hsbj 105 "\n" cont_sbj 106 107 :cont_sbj HdSbj 108 * hbol noeat 109 " \t" hsbj recolor=-1 110 111 :hsdate Head 112 * hdate 113 "\n" hbol 114 115 :hdate HdDate 116 * hdate 117 "\n" hbol 118 119 :hsrrecp Head 120 * hrrecp 121 "\n" hbol 122 123 :hrrecp HdRRT 124 * hrrecp 125 "\n" hbol 126 127 :hsgroups Head 128 * hgroups 129 "\n" hbol 130 131 :hgroups HdGrp 132 * hgroups 133 "\n" hbol 134 135 :hsfolup Head 136 * hfolup 137 "\n" hbol 138 139 :hfolup HdFuT 140 * hfolup 141 "\n" hbol 142 143 # body of the message 144 145 :newline Idle 146 * knocolor 147 "\n" newline 148 ">|:~}#]" q1 recolor=-1 149 "-" maybesign1 recolor=-1 150 151 :maybesign1 Quot1 152 * q1 153 " \t" q1 154 "\n" newline recolor=-1 155 ">|:~}#]" q2 recolor=-1 156 "-" maybesign2 recolor=-1 157 158 :maybesign2 Quot2 159 * q2 160 "\t" q2 161 "\n" newline recolor=-1 162 " " maybesign3 recolor=-1 163 ">|:~}#]" q1 recolor=-1 164 "-" knocolor recolor=-3 165 166 :maybesign3 Quot2 167 * q2 168 " \t" q2 169 "\n" sign recolor=-4 170 "->|:~}#]" q1 recolor=-1 171 172 :sign Sign 173 * sign 174 175 :q1 Quot1 176 * kq1 177 "\n" newline 178 " \t" q1 179 "->|:~}#]" q2 recolor=-1 180 181 :q2 Quot2 182 * kq2 183 "\n" newline 184 " \t" q2 185 "->|:~}#]" q1 recolor=-1 186 187 :knocolor Idle 188 * knocolor 189 "\n" newline 190 191 :kq1 Quot1 192 * kq1 193 "\n" newline 194 195 :kq2 Quot2 196 * kq2 197 "\n" newline