IntenseFinance/neovim
3
0
Fork 0
mirror of https://github.com/neovim/neovim.git synced 2025-02-25 18:55:25 -06:00
Code Issues Packages Projects Releases Wiki Activity

provider/perl: simplify detection

Browse Source
This commit is contained in:
Jan Edmund Lazo 2020-01-15 21:12:36 -05:00
parent 3420bd21e1
commit ef3e610138
No known key found for this signature in database
GPG Key ID: 64915E6E9F735B15
1 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
runtime/autoload/provider/perl.vim
View File

@ -6,18 +6,14 @@ let s:loaded_perl_provider = 1
function! provider#perl#Detect() abort
" use g:perl_host_prof if set or check if perl is on the path
let prog = get(g:, 'perl_host_prog', executable('perl') ? 'perl' : '')
" if perl is available, make sure the required module is available
if prog != ''
let job_id = jobstart(prog.' -MNeovim::Ext -e "exit 0"', {'stdout_buffered': v:true})
let result = jobwait([job_id])
if result[0] != 0
let prog = ''
endif
let prog = exepath(get(g:, 'perl_host_prog', 'perl'))
if empty(prog)
return ''
endif
return prog
" if perl is available, make sure the required module is available
call system([prog, '-W', '-MNeovim::Ext', '-e', ''])
return v:shell_error ? '' : prog
endfunction
function! provider#perl#Prog() abort