Add create/delete/rename mappings for dirvish

`Shdo` (mapped to 'x') is nice for batch operations. These new mappings
are for quick edits.

vim/settings/filebrowser.vim

@@ -11,23 +11,56 @@ augroup dirvishCustomisation
 
   " Add/Adjust mappings.
   " - Reverse 'o' to (o)pen and 'i' to spl(i)t.
-  " - `mc` to create a file.
+  " - Create, Delete, Rename with 'mc', 'md', 'mr'.
   autocmd FileType dirvish let s:nowait = (v:version > 703 ? '<nowait>' : '')
         \| execute 'nnoremap '.s:nowait.'<buffer><silent> o :<C-U>.call dirvish#open("edit", 0)<CR>'
         \| execute 'nnoremap '.s:nowait.'<buffer><silent> i :<C-U>.call dirvish#open("split", 1)<CR>'
         \| execute 'xnoremap '.s:nowait.'<buffer><silent> O :call dirvish#open("edit", 0)<CR>'
         \| execute 'xnoremap '.s:nowait.'<buffer><silent> I :call dirvish#open("split", 1)<CR>'
-        \| execute 'nnoremap '.s:nowait.'<buffer> mc :e %'
+        \| execute 'nnoremap '.s:nowait.'<buffer><silent> mc :<C-U>.call FileCreate()<CR>'
+        \| execute 'nnoremap '.s:nowait.'<buffer><silent> md :<C-U>.call FileDelete()<CR>'
+        \| execute 'nnoremap '.s:nowait.'<buffer><silent> mr :<C-U>.call FileRename()<CR>'
 augroup END
 
-" CtrlP - Fuzzy Finder in Vimscript
+" Create files/directories in dirvish buffers.
+function! FileCreate()
+  if &ft != "dirvish" | return | endif
+  let filename = inputdialog('New File: ', expand('%'), 0)
+  if filename == "0" | return | endif
+  " Create any directories required.
+  let dirname = fnamemodify(filename, ':p:h')
+  if dirname != expand('%:h') | call system('mkdir -p '.dirname) | endif
+  " Edit the file if it is a file.
+  if !isdirectory(filename)
+    execute 'edit' filename
+  else
+    normal R
+  endif
+endfunction
+
+" Delete files/directories in dirvish buffers.
+function! FileDelete()
+  if &ft != "dirvish" | return | endif
+  let current = getline('.')
+  let delcheck = confirm('Delete `'.current.'`?', "&Yes\n&No", 2)
+  if delcheck != 1 | return | endif
+  let delcheck = confirm('Are you SURE?', "&Yes\n&No", 2)
+  if delcheck != 1 | return | endif
+  call delete(current, 'rf') | normal R
+endfunction
+
+" Rename files/directories in dirvish buffers.
+function! FileRename()
+  if &ft != "dirvish" | return | endif
+  let current = getline('.')
+  let newname = inputdialog('Rename: ', current, 0)
+  if newname == "0" | return | endif
+  call rename(current, newname) | normal R
+endfunction
 
-" Use `ag` as fallback if available.
-if executable('ag')
-  let s:fallback = 'ag %s -l --nocolor -g ""'
-else
-  let s:fallback = 'find %s -type f'
-endif
+
+" CtrlP - Fuzzy Finder in Vimscript
+let s:fallback = executable('ag') ? 'ag %s -l --nocolor -g ""' : 'find %s -type f'
 
 let g:ctrlp_user_command = [
   \ '.git',
@@ -41,5 +74,4 @@ map <silent> <Leader>f :CtrlPFunky<CR>
 
 
 " FZF - Fuzzy Finder in Go/Ruby
-
 map <silent> <Leader>p :FZF<CR>