diff options
Diffstat (limited to 'vim/after/ftplugin/perl/check.vim')
-rw-r--r-- | vim/after/ftplugin/perl/check.vim | 25 |
1 files changed, 6 insertions, 19 deletions
diff --git a/vim/after/ftplugin/perl/check.vim b/vim/after/ftplugin/perl/check.vim index e115b37f..f6f99f08 100644 --- a/vim/after/ftplugin/perl/check.vim +++ b/vim/after/ftplugin/perl/check.vim @@ -10,33 +10,20 @@ if exists('b:did_ftplugin_perl_check') finish endif +" Don't load if the user doesn't want ftplugin mappings +if exists('g:no_plugin_maps') || exists('g:no_perl_maps') + finish +endif + " Flag as loaded let b:did_ftplugin_perl_check = 1 let b:undo_ftplugin = b:undo_ftplugin \ . '|unlet b:did_ftplugin_perl_check' -" Build function for checker -function! s:PerlCheck() - if exists('b:current_compiler') - let l:save_compiler = b:current_compiler - endif - compiler perl - lmake! - lwindow - if exists('l:save_compiler') - execute 'compiler ' . l:save_compiler - endif -endfunction - -" Stop here if the user doesn't want ftplugin mappings -if exists('g:no_plugin_maps') || exists('g:no_perl_maps') - finish -endif - " Define a mapping target nnoremap <buffer> <silent> <unique> \ <Plug>PerlCheck - \ :<C-U>call <SID>PerlCheck()<CR> + \ :<C-U>call compiler#Make('perl')<CR> let b:undo_ftplugin = b:undo_ftplugin \ . '|nunmap <buffer> <Plug>PerlCheck' |