diff options
| author | Bram Moolenaar <Bram@vim.org> | 2010-07-28 17:02:55 +0200 |
|---|---|---|
| committer | Bram Moolenaar <Bram@vim.org> | 2010-07-28 17:02:55 +0200 |
| commit | c6485bceb1c236ee753f3216121d67845fe53ec8 (patch) | |
| tree | 667d5d889950de5ee329c1b430327583dd180230 /runtime/indent/perl.vim | |
| parent | 292916084623fe352eba3095e6f30146604bd8c0 (diff) | |
Updated runtime files.
Diffstat (limited to 'runtime/indent/perl.vim')
| -rw-r--r-- | runtime/indent/perl.vim | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/runtime/indent/perl.vim b/runtime/indent/perl.vim index b3a9fc0214..0eb95e3afb 100644 --- a/runtime/indent/perl.vim +++ b/runtime/indent/perl.vim @@ -2,11 +2,12 @@ " Language: Perl " Author: Rafael Garcia-Suarez <rgarciasuarez@free.fr> " URL: http://rgarciasuarez.free.fr/vim/indent/perl.vim -" Last Change: 2005 Sep 07 +" Last Change: 2010 Jul 28 " Suggestions and improvements by : " Aaron J. Sherman (use syntax for hints) " Artem Chuprina (play nice with folding) +" Benjamin R. Haskell (fold syntax group fix) " TODO things that are not or not properly indented (yet) : " - Continued statements @@ -133,7 +134,7 @@ function GetPerlIndent() \ || synid == "perlMatchStartEnd" \ || synid == "perlHereDoc" \ || synid =~ "^perlFiledescStatement" - \ || synid =~ '^perl\(Sub\|BEGINEND\|If\)Fold' + \ || synid =~ '^perl\(Sub\|Block\)Fold' let brace = strpart(line, bracepos, 1) if brace == '(' || brace == '{' let ind = ind + &sw @@ -148,7 +149,7 @@ function GetPerlIndent() let synid = synIDattr(synID(v:lnum, bracepos, 0), "name") if synid == "" \ || synid == "perlMatchStartEnd" - \ || synid =~ '^perl\(Sub\|BEGINEND\|If\)Fold' + \ || synid =~ '^perl\(Sub\|Block\)Fold' let ind = ind - &sw endif endif |