[Tags] run perl for s:bin.tags (#559)

This commit is contained in:
Jan Edmund Lazo 2018-01-02 04:14:48 -05:00 committed by Junegunn Choi
parent 009c58b481
commit 02654656af

View file

@ -842,7 +842,7 @@ function! fzf#vim#tags(query, ...)
let opts = v2_limit < 0 ? '--algo=v1 ' : ''
return s:fzf('tags', {
\ 'source': fzf#shellescape(s:bin.tags).' '.join(map(tagfiles, 'fzf#shellescape(fnamemodify(v:val, ":p"))')),
\ 'source': 'perl '.fzf#shellescape(s:bin.tags).' '.join(map(tagfiles, 'fzf#shellescape(fnamemodify(v:val, ":p"))')),
\ 'sink*': s:function('s:tags_sink'),
\ 'options': opts.'--nth 1..2 -m --tiebreak=begin --prompt "Tags> "'.s:q(a:query)}, a:000)
endfunction