summaryrefslogtreecommitdiff
path: root/test/command_callback/test_perl_command_callback.vader
diff options
context:
space:
mode:
Diffstat (limited to 'test/command_callback/test_perl_command_callback.vader')
-rw-r--r--test/command_callback/test_perl_command_callback.vader31
1 files changed, 4 insertions, 27 deletions
diff --git a/test/command_callback/test_perl_command_callback.vader b/test/command_callback/test_perl_command_callback.vader
index ba85e53b..3c4b661c 100644
--- a/test/command_callback/test_perl_command_callback.vader
+++ b/test/command_callback/test_perl_command_callback.vader
@@ -1,37 +1,14 @@
Before:
- Save g:ale_perl_perl_executable
- Save g:ale_perl_perl_options
-
- unlet! g:ale_perl_perl_executable
- unlet! g:ale_perl_perl_options
-
- runtime ale_linters/perl/perl.vim
+ call ale#assert#SetUpLinterTest('perl', 'perl')
After:
- Restore
-
- unlet! b:ale_perl_perl_executable
- unlet! b:ale_perl_perl_options
-
- call ale#linter#Reset()
+ call ale#assert#TearDownLinterTest()
Execute(The default Perl command callback should be correct):
- AssertEqual
- \ 'perl',
- \ ale_linters#perl#perl#GetExecutable(bufnr(''))
-
- AssertEqual
- \ ale#Escape('perl') . ' -c -Mwarnings -Ilib %t',
- \ ale_linters#perl#perl#GetCommand(bufnr(''))
+ AssertLinter 'perl', ale#Escape('perl') . ' -c -Mwarnings -Ilib %t'
Execute(Overriding the executable and command should work):
let b:ale_perl_perl_executable = 'foobar'
let b:ale_perl_perl_options = '-w'
- AssertEqual
- \ 'foobar',
- \ ale_linters#perl#perl#GetExecutable(bufnr(''))
-
- AssertEqual
- \ ale#Escape('foobar') . ' -w %t',
- \ ale_linters#perl#perl#GetCommand(bufnr(''))
+ AssertLinter 'foobar', ale#Escape('foobar') . ' -w %t'