From c4dc71a54742e280f2145dcc58c5f5bd471c2b7e Mon Sep 17 00:00:00 2001
From: Tom Ryder <tom@sanctum.geek.nz>
Date: Sun, 15 Dec 2019 17:22:38 +1300
Subject: Add mappings to change 'equalprg' in Perl and PHP

---
 vim/after/ftplugin/perl.vim | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

(limited to 'vim/after/ftplugin/perl.vim')

diff --git a/vim/after/ftplugin/perl.vim b/vim/after/ftplugin/perl.vim
index 5c9cf8a0..611af62c 100644
--- a/vim/after/ftplugin/perl.vim
+++ b/vim/after/ftplugin/perl.vim
@@ -1,8 +1,11 @@
 " Use Perl itself for checking and Perl::Tidy for tidying
 compiler perl
-setlocal equalprg=perltidy
 let b:undo_ftplugin .= '|unlet b:current_compiler'
-      \ . '|setlocal equalprg< errorformat< makeprg<'
+      \ . '|setlocal errorformat< makeprg<'
+if executable('perltidy')
+  setlocal equalprg=perltidy
+  let b:undo_ftplugin .= '|setlocal equalprg<'
+endif
 
 " Fold based on indent level, but start with all folds open
 setlocal foldmethod=indent
@@ -38,6 +41,14 @@ nnoremap <buffer> <LocalLeader>l
 let b:undo_ftplugin .= '|nunmap <buffer> <LocalLeader>c'
       \ . '|nunmap <buffer> <LocalLeader>l'
 
+" Mappings to choose 'equalprg'
+nnoremap <buffer> <LocalLeader>t
+      \ :<C-U>setlocal equalprg=perltidy<CR>
+nnoremap <buffer> <LocalLeader>i
+      \ :<C-U>setlocal equalprg<<CR>
+let b:undo_ftplugin .= '|nunmap <buffer> <LocalLeader>t'
+      \ . '|nunmap <buffer> <LocalLeader>i'
+
 " Bump version numbers
 nmap <buffer> <LocalLeader>v
       \ <Plug>(PerlVersionBumpMinor)
-- 
cgit v1.2.3