updated for version 7.0063
This commit is contained in:
@ -23,17 +23,17 @@ syn case match
|
||||
" For "From " matching case is required. The "From " is not matched in quoted
|
||||
" emails
|
||||
syn region mailHeader contains=@mailHeaderFields start="^From " skip="^\s" end="\v^[-A-Za-z0-9]*([^-A-Za-z0-9:]|$)"me=s-1
|
||||
syn match mailHeaderKey contained contains=mailEmail "^From\s.*$"
|
||||
syn match mailHeaderKey contained contains=mailEmail,@NoSpell "^From\s.*$"
|
||||
|
||||
syn case ignore
|
||||
" Nothing else depends on case. Headers in properly quoted (with "> " or ">")
|
||||
" emails are matched
|
||||
syn region mailHeader keepend contains=@mailHeaderFields,@mailQuoteExps start="^\z(\(> \?\)*\)\v(newsgroups|from|((in-)?reply-)?to|b?cc|subject|return-path|received|date|replied):" skip="^\z1\s" end="\v^\z1[-a-z0-9]*([^-a-z0-9:]|$)"me=s-1 end="\v^\z1@!"me=s-1 end="\v^\z1(\> ?)+"me=s-1
|
||||
syn region mailHeader keepend contains=@mailHeaderFields,@mailQuoteExps,@NoSpell start="^\z(\(> \?\)*\)\v(newsgroups|from|((in-)?reply-)?to|b?cc|subject|return-path|received|date|replied):" skip="^\z1\s" end="\v^\z1[-a-z0-9]*([^-a-z0-9:]|$)"me=s-1 end="\v^\z1@!"me=s-1 end="\v^\z1(\> ?)+"me=s-1
|
||||
|
||||
syn region mailHeaderKey contained contains=mailHeaderEmail,mailEmail,@mailQuoteExps start="\v(^(\> ?)*)@<=(to|b?cc):" skip=",$" end="$"
|
||||
syn match mailHeaderKey contained contains=mailHeaderEmail,mailEmail "\v(^(\> ?)*)@<=(from|reply-to):.*$"
|
||||
syn region mailHeaderKey contained contains=mailHeaderEmail,mailEmail,@mailQuoteExps,@NoSpell start="\v(^(\> ?)*)@<=(to|b?cc):" skip=",$" end="$"
|
||||
syn match mailHeaderKey contained contains=mailHeaderEmail,mailEmail,@NoSpell "\v(^(\> ?)*)@<=(from|reply-to):.*$"
|
||||
syn match mailHeaderKey contained "\v(^(\> ?)*)@<=date:"
|
||||
syn match mailSubject contained "\v(^(\> ?)*)@<=subject:.*$" contains=@Spell
|
||||
syn match mailSubject contained "\v(^(\> ?)*)@<=subject:.*$"
|
||||
|
||||
" Anything in the header between < and > is an email address
|
||||
syn match mailHeaderEmail contained "<.\{-}>"
|
||||
|
||||
Reference in New Issue
Block a user