" Vim syntax file " Language: Mason (Perl embedded in HTML) " Maintainer: Andrew Smith " Last change: 2003 May 11 " URL: http://www.masonhq.com/editors/mason.vim " " This seems to work satisfactorily with html.vim and perl.vim for version 5.5. " Please mail any fixes or improvements to the above address. Things that need " doing include: " " - Add match for component names in <& &> blocks. " - Add match for component names in <%def> and <%method> block delimiters. " - Fix <%text> blocks to show HTML tags but ignore Mason tags. " " Clear previous syntax settings unless this is v6 or above, in which case just " exit without doing anything. " if version < 600 syn clear elseif exists("b:current_syntax") finish endif " The HTML syntax file included below uses this variable. " if !exists("main_syntax") let main_syntax = 'mason' endif " First pull in the HTML syntax. " if version < 600 so :p:h/html.vim else runtime! syntax/html.vim unlet b:current_syntax endif syn cluster htmlPreproc add=@masonTop " Now pull in the Perl syntax. " if version < 600 syn include @perlTop :p:h/perl.vim else syn include @perlTop syntax/perl.vim endif " It's hard to reduce down to the correct sub-set of Perl to highlight in some " of these cases so I've taken the safe option of just using perlTop in all of " them. If you have any suggestions, please let me know. " syn region masonLine matchgroup=Delimiter start="^%" end="$" contains=@perlTop syn region masonExpr matchgroup=Delimiter start="<%" end="%>" contains=@perlTop syn region masonPerl matchgroup=Delimiter start="<%perl>" end="" contains=@perlTop syn region masonComp keepend matchgroup=Delimiter start="<&" end="&>" contains=@perlTop syn region masonArgs matchgroup=Delimiter start="<%args>" end="" contains=@perlTop syn region masonInit matchgroup=Delimiter start="<%init>" end="" contains=@perlTop syn region masonCleanup matchgroup=Delimiter start="<%cleanup>" end="" contains=@perlTop syn region masonOnce matchgroup=Delimiter start="<%once>" end="" contains=@perlTop syn region masonShared matchgroup=Delimiter start="<%shared>" end="" contains=@perlTop syn region masonDef matchgroup=Delimiter start="<%def[^>]*>" end="" contains=@htmlTop syn region masonMethod matchgroup=Delimiter start="<%method[^>]*>" end="" contains=@htmlTop syn region masonFlags matchgroup=Delimiter start="<%flags>" end="" contains=@perlTop syn region masonAttr matchgroup=Delimiter start="<%attr>" end="" contains=@perlTop syn region masonFilter matchgroup=Delimiter start="<%filter>" end="" contains=@perlTop syn region masonDoc matchgroup=Delimiter start="<%doc>" end="" syn region masonText matchgroup=Delimiter start="<%text>" end="" syn cluster masonTop contains=masonLine,masonExpr,masonPerl,masonComp,masonArgs,masonInit,masonCleanup,masonOnce,masonShared,masonDef,masonMethod,masonFlags,masonAttr,masonFilter,masonDoc,masonText " Set up default highlighting. Almost all of this is done in the included " syntax files. " if version >= 508 || !exists("did_mason_syn_inits") if version < 508 let did_mason_syn_inits = 1 com -nargs=+ HiLink hi link else com -nargs=+ HiLink hi def link endif HiLink masonDoc Comment delc HiLink endif let b:current_syntax = "mason" if main_syntax == 'mason' unlet main_syntax endif