summaryrefslogtreecommitdiff
path: root/ale_linters/perl
diff options
context:
space:
mode:
authorBjorn Neergaard <bjorn@neersighted.com>2016-10-10 18:43:45 -0500
committerBjorn Neergaard <bjorn@neersighted.com>2016-10-11 06:14:26 -0500
commitfb4b797dd22b2ec225542c97e5c0c4195edf037e (patch)
treebe6bc337e1403aaded57cfaaf0ce506e73cfb225 /ale_linters/perl
parentca4badfb3a0ae73d4fcac3512c8cfae2a6a94f03 (diff)
downloadale-fb4b797dd22b2ec225542c97e5c0c4195edf037e.zip
Use explicit scope in all ale_linters
vint -s is now clean
Diffstat (limited to 'ale_linters/perl')
-rw-r--r--ale_linters/perl/perl.vim28
-rw-r--r--ale_linters/perl/perlcritic.vim28
2 files changed, 28 insertions, 28 deletions
diff --git a/ale_linters/perl/perl.vim b/ale_linters/perl/perl.vim
index c5300ac8..5b35803c 100644
--- a/ale_linters/perl/perl.vim
+++ b/ale_linters/perl/perl.vim
@@ -7,34 +7,34 @@ endif
let g:loaded_ale_linters_perl_perl = 1
function! ale_linters#perl#perl#Handle(buffer, lines)
- let pattern = '\(.\+\) at \(.\+\) line \(\d\+\)'
- let output = []
+ let l:pattern = '\(.\+\) at \(.\+\) line \(\d\+\)'
+ let l:output = []
- for line in a:lines
- let l:match = matchlist(line, pattern)
+ for l:line in a:lines
+ let l:match = matchlist(l:line, l:pattern)
if len(l:match) == 0
continue
endif
- let line = l:match[3]
- let column = 1
- let text = l:match[1]
- let type = 'E'
+ let l:line = l:match[3]
+ let l:column = 1
+ let l:text = l:match[1]
+ let l:type = 'E'
" vcol is Needed to indicate that the column is a character.
- call add(output, {
+ call add(l:output, {
\ 'bufnr': a:buffer,
- \ 'lnum': line,
+ \ 'lnum': l:line,
\ 'vcol': 0,
- \ 'col': column,
- \ 'text': text,
- \ 'type': type,
+ \ 'col': l:column,
+ \ 'text': l:text,
+ \ 'type': l:type,
\ 'nr': -1,
\})
endfor
- return output
+ return l:output
endfunction
call ale#linter#Define('perl', {
diff --git a/ale_linters/perl/perlcritic.vim b/ale_linters/perl/perlcritic.vim
index 64e1e3e4..8e29a574 100644
--- a/ale_linters/perl/perlcritic.vim
+++ b/ale_linters/perl/perlcritic.vim
@@ -7,34 +7,34 @@ endif
let g:loaded_ale_linters_perl_perlcritic = 1
function! ale_linters#perl#perlcritic#Handle(buffer, lines)
- let pattern = '\(.\+\) at \(.\+\) line \(\d\+\)'
- let output = []
+ let l:pattern = '\(.\+\) at \(.\+\) line \(\d\+\)'
+ let l:output = []
- for line in a:lines
- let l:match = matchlist(line, pattern)
+ for l:line in a:lines
+ let l:match = matchlist(l:line, l:pattern)
if len(l:match) == 0
continue
endif
- let line = l:match[3]
- let column = 1
- let text = l:match[1]
- let type = 'E'
+ let l:line = l:match[3]
+ let l:column = 1
+ let l:text = l:match[1]
+ let l:type = 'E'
" vcol is Needed to indicate that the column is a character.
- call add(output, {
+ call add(l:output, {
\ 'bufnr': a:buffer,
- \ 'lnum': line,
+ \ 'lnum': l:line,
\ 'vcol': 0,
- \ 'col': column,
- \ 'text': text,
- \ 'type': type,
+ \ 'col': l:column,
+ \ 'text': l:text,
+ \ 'type': l:type,
\ 'nr': -1,
\})
endfor
- return output
+ return l:output
endfunction
call ale#linter#Define('perl', {