summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorw0rp <devw0rp@gmail.com>2017-06-25 21:49:57 +0100
committerw0rp <devw0rp@gmail.com>2017-06-25 21:49:57 +0100
commit1917e9157c5134044e16bb84997ad7fe5860a833 (patch)
tree72316f7a63cb34e7b2e3f3dc8836a5f0e51ef49c /test
parent3828ea5b2655a03fe8de0332797386f42ae3b9ac (diff)
downloadale-1917e9157c5134044e16bb84997ad7fe5860a833.zip
Fix #694 - Ignore BEGIN failed errors for Perl only for certain errors
Diffstat (limited to 'test')
-rw-r--r--test/handler/test_perl_handler.vader14
1 files changed, 14 insertions, 0 deletions
diff --git a/test/handler/test_perl_handler.vader b/test/handler/test_perl_handler.vader
index 1effd68c..3ada9aa4 100644
--- a/test/handler/test_perl_handler.vader
+++ b/test/handler/test_perl_handler.vader
@@ -36,3 +36,17 @@ Execute(The Perl linter should complain about failing to locate modules):
\ 'Can''t locate JustOneDb.pm in @INC (you may need to install the JustOneDb module) (@INC contains: /home/local/sean/work/PostgreSQL/6616/../../../../lib /home/local/sean/work/PostgreSQL/6616/lib lib /etc/perl /usr/local/lib/perl/5.18.2 /usr/local/share/perl/5.18.2 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.18 /usr/share/perl/5.18 /usr/local/lib/site_perl .) at - line 23.',
\ 'BEGIN failed--compilation aborted at - line 23.',
\ ])
+
+
+Execute(The Perl linter should complain about failing to locate modules):
+ AssertEqual
+ \ [
+ \ {'lnum': '8', 'type': 'E', 'text': 'BEGIN failed--compilation aborted'},
+ \ {'lnum': '10', 'type': 'E', 'text': 'BEGIN failed--compilation aborted'}
+ \ ],
+ \ ale_linters#perl#perl#Handle(bufnr(''), [
+ \ 'Unable to build `ro` accessor for slot `path` in `App::CPANFileUpdate` because the slot cannot be found. at /extlib/Method/Traits.pm line 189.',
+ \ 'BEGIN failed--compilation aborted at - line 8.',
+ \ 'Unable to build `ro` accessor for slot `path` in `App::CPANFileUpdate` because the slot cannot be found. at /extlib/Method/Traits.pm line 189.',
+ \ 'BEGIN failed--compilation aborted at - line 10.',
+ \ ])