noremap p "0p
noremap P "0P
for s:i in ['"','*','+','-','.',':','%','/','=','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z']
execute 'noremap "'.s:i.'p "'.s:i.'p'
execute 'noremap "'.s:i.'P "'.s:i.'P'
endfor
nnoremap d "dd "send latest delete to d register
nnoremap D "dD "send latest delete to d register
nnoremap dd "ddd "send latest delete to d register
nnoremap x "_x "send char deletes to black hole, not worth saving
nnoremap <leader>p "dp "paste what was deleted
nnoremap <leader>P "dP "paste what was deleted