Anubis / Xlib

Commit 25741a800f0ed9e1e58fa5bd39ba4629e9eba69d

Authored by David RENÉ
1 parent 6dc16ef7

add support of + 'add sign' into email address

Showing 1 changed file with 4 additions and 0 deletions   Show diff stats
Inline Side-by-side
mail/lexers/fqa.anubis
  Show/Hide comments   View file @25741a8
@@ -189,6 +189,7 @@ public define (LM_LexerState_FQA,LM_TokenOrError_FQA) @@ -189,6 +189,7 @@ public define (LM_LexerState_FQA,LM_TokenOrError_FQA)
189 then email_tester_state_3(clear_abol(ls)) else 189 then email_tester_state_3(clear_abol(ls)) else
190 if lm_next_char(ls) is (_ls,c) then 190 if lm_next_char(ls) is (_ls,c) then
191 if c = -1 then email_tester_state_1(_ls) else 191 if c = -1 then email_tester_state_1(_ls) else
  192 + if c = 43 then email_tester_state_4(_ls) else
192 if c = 45 then email_tester_state_4(_ls) else 193 if c = 45 then email_tester_state_4(_ls) else
193 if (48 +=< c & c +=< 57) then email_tester_state_4(_ls) else 194 if (48 +=< c & c +=< 57) then email_tester_state_4(_ls) else
194 if (65 +=< c & c +=< 90) then email_tester_state_4(_ls) else 195 if (65 +=< c & c +=< 90) then email_tester_state_4(_ls) else
@@ -232,6 +233,7 @@ define (LM_LexerState_FQA,LM_TokenOrError_FQA) @@ -232,6 +233,7 @@ define (LM_LexerState_FQA,LM_TokenOrError_FQA)
232 LM_LexerState_FQA ls, 233 LM_LexerState_FQA ls,
233 ) = 234 ) =
234 if lm_next_char(ls) is (_ls,c) then 235 if lm_next_char(ls) is (_ls,c) then
  236 + if c = 43 then email_tester_state_4(_ls) else
235 if c = 45 then email_tester_state_4(_ls) else 237 if c = 45 then email_tester_state_4(_ls) else
236 if c = 46 then email_tester_state_5(_ls) else 238 if c = 46 then email_tester_state_5(_ls) else
237 if (48 +=< c & c +=< 57) then email_tester_state_4(_ls) else 239 if (48 +=< c & c +=< 57) then email_tester_state_4(_ls) else
@@ -248,6 +250,7 @@ define (LM_LexerState_FQA,LM_TokenOrError_FQA) @@ -248,6 +250,7 @@ define (LM_LexerState_FQA,LM_TokenOrError_FQA)
248 LM_LexerState_FQA ls, 250 LM_LexerState_FQA ls,
249 ) = 251 ) =
250 if lm_next_char(ls) is (_ls,c) then 252 if lm_next_char(ls) is (_ls,c) then
  253 + if c = 43 then email_tester_state_6(_ls) else
251 if c = 45 then email_tester_state_6(_ls) else 254 if c = 45 then email_tester_state_6(_ls) else
252 if (48 +=< c & c +=< 57) then email_tester_state_6(_ls) else 255 if (48 +=< c & c +=< 57) then email_tester_state_6(_ls) else
253 if (65 +=< c & c +=< 90) then email_tester_state_6(_ls) else 256 if (65 +=< c & c +=< 90) then email_tester_state_6(_ls) else
@@ -262,6 +265,7 @@ define (LM_LexerState_FQA,LM_TokenOrError_FQA) @@ -262,6 +265,7 @@ define (LM_LexerState_FQA,LM_TokenOrError_FQA)
262 LM_LexerState_FQA ls, 265 LM_LexerState_FQA ls,
263 ) = 266 ) =
264 if lm_next_char(ls) is (_ls,c) then 267 if lm_next_char(ls) is (_ls,c) then
  268 + if c = 43 then email_tester_state_6(_ls) else
265 if c = 45 then email_tester_state_6(_ls) else 269 if c = 45 then email_tester_state_6(_ls) else
266 if c = 46 then email_tester_state_5(_ls) else 270 if c = 46 then email_tester_state_5(_ls) else
267 if (48 +=< c & c +=< 57) then email_tester_state_6(_ls) else 271 if (48 +=< c & c +=< 57) then email_tester_state_6(_ls) else