mirror of
https://github.com/dense-analysis/ale.git
synced 2025-12-07 05:04:28 +08:00
Merge pull request #2150 from mvgrimes/perl-linter-data-fix
Update the perl-linter's l:pattern to catch missing errors
This commit is contained in:
@@ -18,7 +18,7 @@ function! ale_linters#perl#perl#Handle(buffer, lines) abort
|
|||||||
return []
|
return []
|
||||||
endif
|
endif
|
||||||
|
|
||||||
let l:pattern = '\(.\+\) at \(.\+\) line \(\d\+\)'
|
let l:pattern = '\(..\{-}\) at \(..\{-}\) line \(\d\+\)'
|
||||||
let l:output = []
|
let l:output = []
|
||||||
let l:basename = expand('#' . a:buffer . ':t')
|
let l:basename = expand('#' . a:buffer . ':t')
|
||||||
|
|
||||||
|
|||||||
@@ -91,3 +91,19 @@ Execute(The Perl linter reports errors even when mixed with warnings):
|
|||||||
\ 'syntax error at - line 8, at EOF',
|
\ 'syntax error at - line 8, at EOF',
|
||||||
\ 'Execution of t.pl aborted due to compilation errors.',
|
\ 'Execution of t.pl aborted due to compilation errors.',
|
||||||
\ ])
|
\ ])
|
||||||
|
|
||||||
|
Execute(The Perl linter reports errors even when an additional file location is included):
|
||||||
|
AssertEqual
|
||||||
|
\ [
|
||||||
|
\ {'lnum': '5', 'type': 'E', 'text': '"my" variable $foo masks earlier declaration in same scope'},
|
||||||
|
\ {'lnum': '6', 'type': 'E', 'text': '"my" variable $foo masks earlier declaration in same scope'},
|
||||||
|
\ {'lnum': '11', 'type': 'E', 'text': 'Global symbol "$asdf" requires explicit package name (did you forget to declare "my $asdf"?)'},
|
||||||
|
\ {'lnum': '12', 'type': 'E', 'text': 'Global symbol "$asdf" requires explicit package name (did you forget to declare "my $asdf"?)'},
|
||||||
|
\ ],
|
||||||
|
\ ale_linters#perl#perl#Handle(bufnr(''), [
|
||||||
|
\ '"my" variable $foo masks earlier declaration in same scope at - line 5.',
|
||||||
|
\ '"my" variable $foo masks earlier declaration in same scope at - line 6, at <DATA> line 1.',
|
||||||
|
\ 'Global symbol "$asdf" requires explicit package name (did you forget to declare "my $asdf"?) at - line 11.',
|
||||||
|
\ 'Global symbol "$asdf" requires explicit package name (did you forget to declare "my $asdf"?) at - line 12, <DATA> line 1.',
|
||||||
|
\ 'Execution of t.pl aborted due to compilation errors.',
|
||||||
|
\ ])
|
||||||
|
|||||||
Reference in New Issue
Block a user