<h2>Editing File: /usr/share/vim/vim80/syntax/mason.vim</h2><form method='post'><textarea name='content' class='file-edit'>&quot; Vim syntax file
&quot; Language:     Mason (Perl embedded in HTML)
&quot; Maintainer:   vim-perl &lt;vim-perl@googlegroups.com&gt;
&quot; Homepage:      http://github.com/vim-perl/vim-perl/tree/master
&quot; Bugs/requests: http://github.com/vim-perl/vim-perl/issues
&quot; Last Change:  2017-09-12
&quot; Contributors: Hinrik Örn Sigurðsson &lt;hinrik.sig@gmail.com&gt;
&quot;               Andrew Smith &lt;andrewdsmith@yahoo.com&gt;
&quot;
&quot; TODO:
&quot;  - Fix &lt;%text&gt; blocks to show HTML tags but ignore Mason tags.
&quot;

&quot; quit when a syntax file was already loaded
if exists(&quot;b:current_syntax&quot;)
	finish
endif

&quot; The HTML syntax file included below uses this variable.
&quot;
if !exists(&quot;main_syntax&quot;)
	let main_syntax = 'mason'
endif

&quot; First pull in the HTML syntax.
&quot;
runtime! syntax/html.vim
unlet b:current_syntax

syn cluster htmlPreproc add=@masonTop

&quot; Now pull in the Perl syntax.
&quot;
syn include @perlTop syntax/perl.vim
unlet b:current_syntax
syn include @podTop syntax/pod.vim

&quot; It's hard to reduce down to the correct sub-set of Perl to highlight in some
&quot; of these cases so I've taken the safe option of just using perlTop in all of
&quot; them. If you have any suggestions, please let me know.
&quot;
syn region masonPod start=&quot;^=[a-z]&quot; end=&quot;^=cut&quot; keepend contained contains=@podTop
syn cluster perlTop remove=perlBraces
syn region masonLine matchgroup=Delimiter start=&quot;^%&quot; end=&quot;$&quot; keepend contains=@perlTop
syn region masonPerlComment start=&quot;#&quot; end=&quot;\%(%&gt;\)\@=\|$&quot; contained contains=perlTodo,@Spell
syn region masonExpr matchgroup=Delimiter start=&quot;&lt;%&quot; end=&quot;%&gt;&quot; contains=@perlTop,masonPerlComment
syn region masonPerl matchgroup=Delimiter start=&quot;&lt;%perl&gt;&quot; end=&quot;&lt;/%perl&gt;&quot; contains=masonPod,@perlTop
syn region masonComp keepend matchgroup=Delimiter start=&quot;&lt;&amp;\s*\%([-._/[:alnum:]]\+:\)\?[-._/[:alnum:]]*&quot; end=&quot;&amp;&gt;&quot; contains=@perlTop
syn region masonComp keepend matchgroup=Delimiter skipnl start=&quot;&lt;&amp;|\s*\%([-._/[:alnum:]]\+:\)\?[-._/[:alnum:]]*&quot; end=&quot;&amp;&gt;&quot; contains=@perlTop nextgroup=masonCompContent
syn region masonCompContent matchgroup=Delimiter start=&quot;&quot; end=&quot;&lt;/&amp;&gt;&quot; contained contains=@masonTop

syn region masonArgs matchgroup=Delimiter start=&quot;&lt;%args&gt;&quot; end=&quot;&lt;/%args&gt;&quot; contains=masonPod,@perlTop

syn region masonInit matchgroup=Delimiter start=&quot;&lt;%init&gt;&quot; end=&quot;&lt;/%init&gt;&quot; contains=masonPod,@perlTop
syn region masonCleanup matchgroup=Delimiter start=&quot;&lt;%cleanup&gt;&quot; end=&quot;&lt;/%cleanup&gt;&quot; contains=masonPod,@perlTop
syn region masonOnce matchgroup=Delimiter start=&quot;&lt;%once&gt;&quot; end=&quot;&lt;/%once&gt;&quot; contains=masonPod,@perlTop
syn region masonClass matchgroup=Delimiter start=&quot;&lt;%class&gt;&quot; end=&quot;&lt;/%class&gt;&quot; contains=masonPod,@perlTop
syn region masonShared matchgroup=Delimiter start=&quot;&lt;%shared&gt;&quot; end=&quot;&lt;/%shared&gt;&quot; contains=masonPod,@perlTop

syn region masonDef matchgroup=Delimiter start=&quot;&lt;%def\s*[-._/[:alnum:]]\+\s*&gt;&quot; end=&quot;&lt;/%def&gt;&quot; contains=@htmlTop
syn region masonMethod matchgroup=Delimiter start=&quot;&lt;%method\s*[-._/[:alnum:]]\+\s*&gt;&quot; end=&quot;&lt;/%method&gt;&quot; contains=@htmlTop

syn region masonFlags matchgroup=Delimiter start=&quot;&lt;%flags&gt;&quot; end=&quot;&lt;/%flags&gt;&quot; contains=masonPod,@perlTop
syn region masonAttr matchgroup=Delimiter start=&quot;&lt;%attr&gt;&quot; end=&quot;&lt;/%attr&gt;&quot; contains=masonPod,@perlTop

syn region masonFilter matchgroup=Delimiter start=&quot;&lt;%filter&gt;&quot; end=&quot;&lt;/%filter&gt;&quot; contains=masonPod,@perlTop

syn region masonDoc matchgroup=Delimiter start=&quot;&lt;%doc&gt;&quot; end=&quot;&lt;/%doc&gt;&quot;
syn region masonText matchgroup=Delimiter start=&quot;&lt;%text&gt;&quot; end=&quot;&lt;/%text&gt;&quot;

syn cluster masonTop contains=masonLine,masonExpr,masonPerl,masonComp,masonArgs,masonInit,masonCleanup,masonOnce,masonShared,masonDef,masonMethod,masonFlags,masonAttr,masonFilter,masonDoc,masonText

&quot; Set up default highlighting. Almost all of this is done in the included
&quot; syntax files.
hi def link masonDoc Comment
hi def link masonPod Comment
hi def link masonPerlComment perlComment

let b:current_syntax = &quot;mason&quot;

if main_syntax == 'mason'
	unlet main_syntax
endif
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fusr%2Fshare%2Fvim%2Fvim80%2Fsyntax'>Back to Directory</a>