41 lines
1.0 KiB
Plaintext
41 lines
1.0 KiB
Plaintext
|
Before:
|
||
|
|
Save g:ale_perl_perltidy_executable
|
||
|
|
Save g:ale_perl_perltidy_options
|
||
|
|
|
||
|
|
" Use an invalid global executable, so we don't match it.
|
||
|
|
let g:ale_perl_perltidy_executable = 'xxxinvalid'
|
||
|
|
let g:ale_perl_perltidy_options = ''
|
||
|
|
|
||
|
|
call ale#test#SetDirectory('/testplugin/test/fixers')
|
||
|
|
|
||
|
|
After:
|
||
|
|
Restore
|
||
|
|
|
||
|
|
call ale#test#RestoreDirectory()
|
||
|
|
|
||
|
|
Execute(The perltidy callback should return the correct default values):
|
||
|
|
call ale#test#SetFilename('../pl_files/testfile.pl')
|
||
|
|
|
||
|
|
AssertEqual
|
||
|
|
\ {
|
||
|
|
\ 'read_temporary_file': 1,
|
||
|
|
\ 'command': ale#Escape('xxxinvalid')
|
||
|
|
\ . ' -b'
|
||
|
|
\ . ' %t',
|
||
|
|
\ },
|
||
|
|
\ ale#fixers#perltidy#Fix(bufnr(''))
|
||
|
|
|
||
|
|
Execute(The perltidy callback should include custom perltidy options):
|
||
|
|
let g:ale_perl_perltidy_options = "-r '(a) -> a'"
|
||
|
|
call ale#test#SetFilename('../pl_files/testfile.pl')
|
||
|
|
|
||
|
|
AssertEqual
|
||
|
|
\ {
|
||
|
|
\ 'read_temporary_file': 1,
|
||
|
|
\ 'command': ale#Escape('xxxinvalid')
|
||
|
|
\ . ' -b'
|
||
|
|
\ . ' ' . g:ale_perl_perltidy_options
|
||
|
|
\ . ' %t',
|
||
|
|
\ },
|
||
|
|
\ ale#fixers#perltidy#Fix(bufnr(''))
|