1" Vim syntax file for the "papp" file format (_p_erl _app_lication) 2" 3" Language: papp 4" Maintainer: Marc Lehmann <pcg@goof.com> 5" Last Change: 2009 Nov 11 6" Filenames: *.papp *.pxml *.pxsl 7" URL: http://papp.plan9.de/ 8 9" You can set the "papp_include_html" variable so that html will be 10" rendered as such inside phtml sections (in case you actually put html 11" there - papp does not require that). Also, rendering html tends to keep 12" the clutter high on the screen - mixing three languages is difficult 13" enough(!). PS: it is also slow. 14 15" pod is, btw, allowed everywhere, which is actually wrong :( 16 17" For version 5.x: Clear all syntax items 18" For version 6.x: Quit when a syntax file was already loaded 19if version < 600 20 syntax clear 21elseif exists("b:current_syntax") 22 finish 23endif 24 25" source is basically xml, with included html (this is common) and perl bits 26if version < 600 27 so <sfile>:p:h/xml.vim 28else 29 runtime! syntax/xml.vim 30endif 31unlet b:current_syntax 32 33if exists("papp_include_html") 34 if version < 600 35 syn include @PAppHtml <sfile>:p:h/html.vim 36 else 37 syn include @PAppHtml syntax/html.vim 38 endif 39 unlet b:current_syntax 40 syntax spell default " added by Bram 41endif 42 43if version < 600 44 syn include @PAppPerl <sfile>:p:h/perl.vim 45else 46 syn include @PAppPerl syntax/perl.vim 47endif 48 49if v:version >= 600 50 syn cluster xmlFoldCluster add=papp_perl,papp_xperl,papp_phtml,papp_pxml,papp_perlPOD 51endif 52 53" preprocessor commands 54syn region papp_prep matchgroup=papp_prep start="^#\s*\(if\|elsif\)" end="$" keepend contains=@perlExpr contained 55syn match papp_prep /^#\s*\(else\|endif\|??\).*$/ contained 56" translation entries 57syn region papp_gettext start=/__"/ end=/"/ contained contains=@papp_perlInterpDQ 58syn cluster PAppHtml add=papp_gettext,papp_prep 59 60" add special, paired xperl, perl and phtml tags 61syn region papp_perl matchgroup=xmlTag start="<perl>" end="</perl>" contains=papp_CDATAp,@PAppPerl keepend 62syn region papp_xperl matchgroup=xmlTag start="<xperl>" end="</xperl>" contains=papp_CDATAp,@PAppPerl keepend 63syn region papp_phtml matchgroup=xmlTag start="<phtml>" end="</phtml>" contains=papp_CDATAh,papp_ph_perl,papp_ph_html,papp_ph_hint,@PAppHtml keepend 64syn region papp_pxml matchgroup=xmlTag start="<pxml>" end="</pxml>" contains=papp_CDATAx,papp_ph_perl,papp_ph_xml,papp_ph_xint keepend 65syn region papp_perlPOD start="^=[a-z]" end="^=cut" contains=@Pod,perlTodo keepend 66 67" cdata sections 68syn region papp_CDATAp matchgroup=xmlCdataDecl start="<!\[CDATA\[" end="\]\]>" contains=@PAppPerl contained keepend 69syn region papp_CDATAh matchgroup=xmlCdataDecl start="<!\[CDATA\[" end="\]\]>" contains=papp_ph_perl,papp_ph_html,papp_ph_hint,@PAppHtml contained keepend 70syn region papp_CDATAx matchgroup=xmlCdataDecl start="<!\[CDATA\[" end="\]\]>" contains=papp_ph_perl,papp_ph_xml,papp_ph_xint contained keepend 71 72syn region papp_ph_perl matchgroup=Delimiter start="<[:?]" end="[:?]>"me=e-2 nextgroup=papp_ph_html contains=@PAppPerl contained keepend 73syn region papp_ph_html matchgroup=Delimiter start=":>" end="<[:?]"me=e-2 nextgroup=papp_ph_perl contains=@PAppHtml contained keepend 74syn region papp_ph_hint matchgroup=Delimiter start="?>" end="<[:?]"me=e-2 nextgroup=papp_ph_perl contains=@perlInterpDQ,@PAppHtml contained keepend 75syn region papp_ph_xml matchgroup=Delimiter start=":>" end="<[:?]"me=e-2 nextgroup=papp_ph_perl contains= contained keepend 76syn region papp_ph_xint matchgroup=Delimiter start="?>" end="<[:?]"me=e-2 nextgroup=papp_ph_perl contains=@perlInterpDQ contained keepend 77 78" synchronization is horrors! 79syn sync clear 80syn sync match pappSync grouphere papp_CDATAh "</\(perl\|xperl\|phtml\|macro\|module\)>" 81syn sync match pappSync grouphere papp_CDATAh "^# *\(if\|elsif\|else\|endif\)" 82syn sync match pappSync grouphere papp_CDATAh "</\(tr\|td\|table\|hr\|h1\|h2\|h3\)>" 83syn sync match pappSync grouphere NONE "</\=\(module\|state\|macro\)>" 84 85syn sync maxlines=300 86syn sync minlines=5 87 88" The default highlighting. 89 90hi def link papp_prep preCondit 91hi def link papp_gettext String 92 93let b:current_syntax = "papp" 94