summaryrefslogtreecommitdiff
path: root/test/test_perlcritic_showrules.vader
diff options
context:
space:
mode:
Diffstat (limited to 'test/test_perlcritic_showrules.vader')
-rw-r--r--test/test_perlcritic_showrules.vader16
1 files changed, 16 insertions, 0 deletions
diff --git a/test/test_perlcritic_showrules.vader b/test/test_perlcritic_showrules.vader
new file mode 100644
index 00000000..52089080
--- /dev/null
+++ b/test/test_perlcritic_showrules.vader
@@ -0,0 +1,16 @@
+Execute(no g:ale_perl_perlcritic_showrules):
+ silent noautocmd new testfile.pl
+
+ let g:ale_perl_perlcritic_showrules = 0
+
+ AssertEqual
+ \ "perlcritic --verbose '". '%l:%c %m\n' . "' --nocolor",
+ \ ale_linters#perl#perlcritic#GetCommand(bufnr(''))
+
+ let g:ale_perl_perlcritic_showrules = 1
+
+ AssertEqual
+ \ "perlcritic --verbose '". '%l:%c %m [%p]\n' . "' --nocolor",
+ \ ale_linters#perl#perlcritic#GetCommand(bufnr(''))
+
+ :q