mailplate shortcuts updated

[etc/vim.git] / .vim / ftplugin / mail.vim

diff --git a/.vim/ftplugin/mail.vim b/.vim/ftplugin/mail.vim
index 437b5a1b5d77cecf5a05401201d5974e4b581028..04315269ecf3fe0cbe0a57d1ab4108fd0059f06c 100644 (file)
--- a/.vim/ftplugin/mail.vim
+++ b/.vim/ftplugin/mail.vim
@@ -1,36 +1,15 @@
 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><F2> :w<CR>:%!mailplate --keep-unknown tahi<CR>
+nmap <buffer> <C-P><F3> :w<CR>:%!mailplate --keep-unknown pmvm<CR>
+nmap <buffer> <C-P><F4> :w<CR>:%!mailplate --keep-unknown pobox<CR>
+nmap <buffer> <C-P><F5> :w<CR>:%!mailplate --keep-unknown debian<CR>
+nmap <buffer> <C-P><F6> :w<CR>:%!mailplate --keep-unknown debconf<CR>
+nmap <buffer> <C-P><F7> :w<CR>:%!mailplate --keep-unknown uniwh<CR>
+nmap <buffer> <C-P><F8> :w<CR>:%!mailplate --keep-unknown mtfk<CR>
 nmap <buffer> <C-P><F9> :w<CR>:%!mailplate --keep-unknown sudetia<CR>
+nmap <buffer> <C-P><F12> :w<CR>:%!mailplate --keep-unknown private<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
-" by Hugo Haas <hugo@larve.net> - 20 June 2004
-" based on an idea by The Doctor What explained at
-" <mid:caq406$rq4$1@FreeBSD.csie.NCTU.edu.tw>
-" http://www.vim.org/scripts/download_script.php?src_id=3165
-autocmd BufUnload mutt-* call CheckAttachments()
-function! CheckAttachments()
-  let l:english = 'attach\(ing\|ed\|ment\)\?\|included\_swith\_sthis\_smail'
-  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\)\_s\(anhang\|beilage\)'
-  let l:ic = &ignorecase
-  if (l:ic == 0)
-    set ignorecase
-  endif
-  if (search('^\([^>|].*\)\?\<\(re-\?\)\?\('.l:english.'\|'.l:german.'\)\>', "w") != 0)
-    let l:temp = inputdialog("Do you want to attach a file? [Hit return] ")
-  endif
-  if (l:ic == 0)
-    set noignorecase
-  endif
-  echo
-endfunction
-
 " change subject line
 " Before: Subject: old
 " After : Subject: New (was: old)