2 " Language: Perl POD format
3 " Maintainer: Scott Bigham <dsb@cs.duke.edu>
4 " Last Change: 2001 May 09
6 " To add embedded POD documentation highlighting to your syntax file, add
9 " syn include @Pod <sfile>:p:h/pod.vim
10 " syn region myPOD start="^=pod" start="^=head" end="^=cut" keepend contained contains=@Pod
12 " and add myPod to the contains= list of some existing region, probably a
13 " comment. The "keepend" flag is needed because "=cut" is matched as a
14 " pattern in its own right.
17 " Remove any old syntax stuff hanging around (this is suppressed
18 " automatically by ":syn include" if necessary).
19 " For version 5.x: Clear all syntax items
20 " For version 6.x: Quit when a syntax file was already loaded
23 elseif exists("b:current_syntax")
28 syn match podCommand "^=head[12]" nextgroup=podCmdText
29 syn match podCommand "^=item" nextgroup=podCmdText
30 syn match podCommand "^=over" nextgroup=podOverIndent skipwhite
31 syn match podCommand "^=back"
32 syn match podCommand "^=cut"
33 syn match podCommand "^=pod"
34 syn match podCommand "^=for" nextgroup=podForKeywd skipwhite
35 syn match podCommand "^=begin" nextgroup=podForKeywd skipwhite
36 syn match podCommand "^=end" nextgroup=podForKeywd skipwhite
38 " Text of a =head1, =head2 or =item command
39 syn match podCmdText ".*$" contained contains=podFormat
41 " Indent amount of =over command
42 syn match podOverIndent "\d\+" contained
44 " Formatter identifier keyword for =for, =begin and =end commands
45 syn match podForKeywd "\S\+" contained
47 " An indented line, to be displayed verbatim
48 syn match podVerbatimLine "^\s.*$"
50 " Inline textual items handled specially by POD
51 syn match podSpecial "\(\<\|&\)\I\i*\(::\I\i*\)*([^)]*)"
52 syn match podSpecial "[$@%]\I\i*\(::\I\i*\)*\>"
54 " Special formatting sequences
55 syn region podFormat start="[IBSCLFXEZ]<" end=">" oneline contains=podFormat
57 " Define the default highlighting.
58 " For version 5.7 and earlier: only when not done already
59 " For version 5.8 and later: only when an item doesn't have highlighting yet
60 if version >= 508 || !exists("did_pod_syntax_inits")
62 let did_pod_syntax_inits = 1
63 command -nargs=+ HiLink hi link <args>
65 command -nargs=+ HiLink hi def link <args>
68 HiLink podCommand Statement
69 HiLink podCmdText String
70 HiLink podOverIndent Number
71 HiLink podForKeywd Identifier
72 HiLink podFormat Identifier
73 HiLink podVerbatimLine PreProc
74 HiLink podSpecial Identifier
79 let b:current_syntax = "pod"