X-Git-Url: https://git.madduck.net/etc/vim.git/blobdiff_plain/5ea02532b5740bbcbcbfb64108d919f5f5333069..75e33c719904b135279c74b946c98bcbe81a4a1b:/.vim/ftplugin/mail.vim?ds=inline

diff --git a/.vim/ftplugin/mail.vim b/.vim/ftplugin/mail.vim
index 934cfcd..e716413 100644
--- a/.vim/ftplugin/mail.vim
+++ b/.vim/ftplugin/mail.vim
@@ -1,10 +1,11 @@
-nmap <buffer> <C-P><F1> :w<CR>:%!~/.bin/mail/mailplate --keep-unknown official<CR>
-nmap <buffer> <C-P><F2> :w<CR>:%!~/.bin/mail/mailplate --keep-unknown private<CR>
-nmap <buffer> <C-P><F3> :w<CR>:%!~/.bin/mail/mailplate --keep-unknown debian<CR>
-nmap <buffer> <C-P><F5> :w<CR>:%!~/.bin/mail/mailplate --keep-unknown ul<CR>
-nmap <buffer> <C-P><F6> :w<CR>:%!~/.bin/mail/mailplate --keep-unknown uzh<CR>
-nmap <buffer> <C-P><F9> :w<CR>:%!~/.bin/mail/mailplate --keep-unknown sudetia<CR>
-nmap <buffer> <F1> :w<CR>:%!~/.bin/mail/mailplate --auto --keep-unknown 2>/dev/null<CR>
+nmap <buffer> <C-P><F1> :w<CR>:%!mailplate --keep-unknown official<CR>
+nmap <buffer> <C-P><F2> :w<CR>:%!mailplate --keep-unknown private<CR>
+nmap <buffer> <C-P><F3> :w<CR>:%!mailplate --keep-unknown debian<CR>
+nmap <buffer> <C-P><F4> :w<CR>:%!mailplate --keep-unknown phd<CR>
+nmap <buffer> <C-P><F5> :w<CR>:%!mailplate --keep-unknown ul<CR>
+nmap <buffer> <C-P><F6> :w<CR>:%!mailplate --keep-unknown uzh<CR>
+nmap <buffer> <C-P><F9> :w<CR>:%!mailplate --keep-unknown sudetia<CR>
+nmap <buffer> <F1> :w<CR>:%!mailplate --auto --keep-unknown 2>/dev/null<CR>
 
 " Checking attachments in edited emails for use in Mutt: warns user when
 " exiting
@@ -16,7 +17,7 @@ autocmd BufUnload mutt-* call CheckAttachments()
 function! CheckAttachments()
   let l:english = 'attach\(ing\|ed\|ment\)\?\|included with this mail'
   let l:french = 'attach\(e\|er\|ée\?s\?\|ement\|ant\)'
-  let l:german = 'an\(gehängt\|hängsel\|bei\)\|bei\(gefügt|lage\)\|\(im\|siehe\)\_sanhang'
+  let l:german = 'an\(gehängt\|hängsel\|bei\)\|bei\(gefügt\|lage\)\|\(im\|siehe\)\_s\(anhang\|beilage\)'
   let l:ic = &ignorecase
   if (l:ic == 0)
     set ignorecase
@@ -76,7 +77,7 @@ set completefunc=LBDBCompleteFn
 ino <expr> <C-n> DelegateCompletion(1)
 ino <expr> <C-p> DelegateCompletion(0)
 
-fun! DelegeteCompletion(next)
+fun! DelegateCompletion(next)
   if getline('.') =~? '^\%(To\|B\=Cc\):'
     return "\x18\x15"
   elseif a:next