diff options
| author | Karel Kočí <cynerd@email.cz> | 2016-06-30 16:03:25 +0200 | 
|---|---|---|
| committer | Karel Kočí <cynerd@email.cz> | 2016-06-30 16:03:25 +0200 | 
| commit | e573b3020c032400eed60b649a2cbf55266e6bb0 (patch) | |
| tree | 8f572394ac8433529c7a8e70d160a2fbe8268b4e /vim/bundle/syntastic/syntax_checkers/perl/perlcritic.vim | |
| parent | b8c667bd64b3edd38d56c63c5bd1db53a23b4499 (diff) | |
| download | myconfigs-e573b3020c032400eed60b649a2cbf55266e6bb0.tar.gz myconfigs-e573b3020c032400eed60b649a2cbf55266e6bb0.tar.bz2 myconfigs-e573b3020c032400eed60b649a2cbf55266e6bb0.zip | |
Add current configurations from old repository
Diffstat (limited to 'vim/bundle/syntastic/syntax_checkers/perl/perlcritic.vim')
| -rw-r--r-- | vim/bundle/syntastic/syntax_checkers/perl/perlcritic.vim | 52 | 
1 files changed, 52 insertions, 0 deletions
| diff --git a/vim/bundle/syntastic/syntax_checkers/perl/perlcritic.vim b/vim/bundle/syntastic/syntax_checkers/perl/perlcritic.vim new file mode 100644 index 0000000..abe9f43 --- /dev/null +++ b/vim/bundle/syntastic/syntax_checkers/perl/perlcritic.vim @@ -0,0 +1,52 @@ +"============================================================================ +"File:        perlcritic.vim +"Description: Syntax checking plugin for syntastic.vim +"Maintainer:  LCD 47 <lcd047 at gmail dot com> +"License:     This program is free software. It comes without any warranty, +"             to the extent permitted by applicable law. You can redistribute +"             it and/or modify it under the terms of the Do What The Fuck You +"             Want To Public License, Version 2, as published by Sam Hocevar. +"             See http://sam.zoy.org/wtfpl/COPYING for more details. +" +"============================================================================ + +if exists('g:loaded_syntastic_perl_perlcritic_checker') +    finish +endif +let g:loaded_syntastic_perl_perlcritic_checker = 1 + +if !exists('g:syntastic_perl_perlcritic_thres') +    let g:syntastic_perl_perlcritic_thres = 5 +endif + +let s:save_cpo = &cpo +set cpo&vim + +function! SyntaxCheckers_perl_perlcritic_GetLocList() dict +    let makeprg = self.makeprgBuild({ +        \ 'args_after': '--quiet --nocolor --verbose "\%s:\%f:\%l:\%c:(\%s) \%m (\%e)\n"' }) + +    let errorformat = '%t:%f:%l:%c:%m' + +    let loclist = SyntasticMake({ +        \ 'makeprg': makeprg, +        \ 'errorformat': errorformat, +        \ 'returns': [0, 2], +        \ 'subtype': 'Style' }) + +    " change error types according to the prescribed threshold +    for e in loclist +        let e['type'] = e['type'] < g:syntastic_perl_perlcritic_thres ? 'W' : 'E' +    endfor + +    return loclist +endfunction + +call g:SyntasticRegistry.CreateAndRegisterChecker({ +    \ 'filetype': 'perl', +    \ 'name': 'perlcritic'}) + +let &cpo = s:save_cpo +unlet s:save_cpo + +" vim: set sw=4 sts=4 et fdm=marker: | 
