Mercurial > vim

comparison runtime/syntax/perl.vim @ 29193:1e9e9d89f0ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update runtime files Commit: https://github.com/vim/vim/commit/d592deb336523a5448779ee3d4bba80334cff1f7 Author: Bram Moolenaar <Bram@vim.org> Date: Fri Jun 17 15:42:40 2022 +0100 Update runtime files
author Bram Moolenaar <Bram@vim.org>
date Fri, 17 Jun 2022 16:45:04 +0200
parents d1fe80fb35e6
children
comparison
equal deleted inserted replaced
29192:e4488cf0eff9 29193:1e9e9d89f0ee
2 " Language: Perl 2 " Language: Perl
3 " Maintainer: vim-perl <vim-perl@googlegroups.com> 3 " Maintainer: vim-perl <vim-perl@googlegroups.com>
4 " Homepage: https://github.com/vim-perl/vim-perl 4 " Homepage: https://github.com/vim-perl/vim-perl
5 " Bugs/requests: https://github.com/vim-perl/vim-perl/issues 5 " Bugs/requests: https://github.com/vim-perl/vim-perl/issues
6 " License: Vim License (see :help license) 6 " License: Vim License (see :help license)
7 " Last Change: 2021 Oct 7 7 " Last Change: 2022 Jun 13
8 " Contributors: Andy Lester <andy@petdance.com> 8 " Contributors: Andy Lester <andy@petdance.com>
9 " Hinrik Örn Sigurðsson <hinrik.sig@gmail.com> 9 " Hinrik Örn Sigurðsson <hinrik.sig@gmail.com>
10 " Lukas Mai <l.mai.web.de> 10 " Lukas Mai <l.mai.web.de>
11 " Nick Hibma <nick@van-laarhoven.org> 11 " Nick Hibma <nick@van-laarhoven.org>
12 " Sonia Heimann <niania@netsurf.org> 12 " Sonia Heimann <niania@netsurf.org>
440 " nothing to work around as it is a non-empty line. 440 " nothing to work around as it is a non-empty line.
441 " 441 "
442 " This problem also exists with empty string delimited heredocs but there's no 442 " This problem also exists with empty string delimited heredocs but there's no
443 " known workaround for that case. 443 " known workaround for that case.
444 if get(g:, 'perl_fold', 0) 444 if get(g:, 'perl_fold', 0)
445 syntax region perlDATA matchgroup=perlDATAStart start="^__DATA__$" end="VIM_PERL_EOF\%$" contains=perlPOD,@perlDATA fold 445 syntax region perlDATA matchgroup=perlDATAStart start="^__DATA__$" end="VIM_PERL_EOF\%$" contains=@perlDATA fold
446 syntax region perlEND matchgroup=perlENDStart start="^__END__$" end="VIM_PERL_EOF\%$" contains=perlPOD,@perlDATA fold 446 syntax region perlEND matchgroup=perlENDStart start="^__END__$" end="VIM_PERL_EOF\%$" contains=@perlDATA fold
447 else 447 else
448 syntax region perlDATA matchgroup=perlDATAStart start="^__DATA__$" end="\%$" contains=perlPOD,@perlDATA 448 syntax region perlDATA matchgroup=perlDATAStart start="^__DATA__$" end="\%$" contains=@perlDATA
449 syntax region perlEND matchgroup=perlENDStart start="^__END__$" end="\%$" contains=perlPOD,@perlDATA 449 syntax region perlEND matchgroup=perlENDStart start="^__END__$" end="\%$" contains=@perlDATA
450 endif
451
452 " TODO: generalise this to allow other filetypes
453 if get(g:, 'perl_highlight_data', 0)
454 syn cluster perlDATA add=perlPOD
455 else
456 syn cluster perlDATA remove=perlPOD
450 endif 457 endif
451 458
452 " 459 "
453 " Folding 460 " Folding
454 if get(g:, 'perl_fold', 0) 461 if get(g:, 'perl_fold', 0)