+++ /dev/null
-setlocal textwidth=68
-setlocal formatoptions-=o
-setlocal formatoptions-=r
-setlocal formatoptions-=l
-setlocal formatoptions+=a
-setlocal formatoptions+=w
-setlocal formatoptions+=n
-
-setlocal comments=n:>
-
-"setlocal spell
-
-augroup tsperrorinsert
- au!
-augroup END
-match none /\s*$/
-augroup listinsert
- au!
-augroup END
-setlocal list
-
-" Dynamically set format options, depending on where you are in a
-" mail, idea from Teemu Likonen:
-" http://groups.google.com/group/vim_use/msg/f59e5c1adc6be2b3
-
-let s:defaults = "setlocal fo=".&fo
-" tw=".&tw." ts=".&ts." sts=".&sts." sw=".&sw." fo=".&fo
-execute s:defaults
-let b:MailAreaDetect=1
-
-nnoremap <buffer><silent> <F9> :call <SID>MailAreaDetect_Switch(0)<CR>
-inoremap <buffer><silent> <F9> <C-\><C-O>:call <SID>MailAreaDetect_Switch(1)<CR>
-
-function! s:MailAreaDetect_Switch(vmode)
- if b:MailAreaDetect
- silent call <SID>MailAreaDetect_Off()
- let b:MailAreaDetect=0
- echo 'MailAreaDetect Off'
- if a:vmode
- sleep 1
- endif
- else
- silent call <SID>MailAreaDetect_On()
- let b:MailAreaDetect=1
- echo 'MailAreaDetect On'
- if a:vmode
- sleep 1
- endif
- endif
-endfu
-
-function! s:MailAreaDetect_On()
- silent autocmd! MailAreaDetect CursorMoved,CursorMoved
- \ <buffer> call <SID>AreaOptions()
- let b:MailAreaDetect=1
-endfunction
-
-function! s:MailAreaDetect_Off()
- silent autocmd! MailAreaDetect
- execute s:defaults
- let b:MailAreaDetect=0
-endfunction
-
-augroup MailAreaDetect
- autocmd!
- call <SID>MailAreaDetect_On()
-augroup END
-
-function! s:AreaOptions()
- execute s:defaults
-
- let s:synCur = synIDattr(synID(line("."),1,0),"name")
- let s:synNext = synIDattr(synID(line(".")+1,1,0),"name")
-
- if s:synNext =~ '^mailQuote' && s:synCur == '' && getline('.') =~ '^.'
- " elseif getline('.') =~ '^\s*[^>]' && getline(line('.')+1) =~ '\m^\s*>'
- setlocal fo-=a
- "echo 'Quotation leader (fo='.&fo.')'
- elseif s:synCur =~ '^mailQuote'
- " elseif getline('.') =~ '\m^\s*>'
- setlocal fo-=a
- "echo 'Quotation (fo='.&fo.')'
- elseif <SID>CheckArea('\m^--- .*\n^+++ ','\v(^$|\n^-- $)')
- setlocal fo-=a fo-=w fo-=t noet
- "echo 'Patch (fo='.&fo.')'
- elseif s:synCur == '' && s:synNext =~ '^mailSignature'
- " elseif getline(line('.')+1) =~ '\m^-- $'
- setlocal fo-=a fo-=w fo-=t
- "echo 'Last line before signature (fo='.&fo.')'
- elseif s:synCur =~ '^mailSignature'
- " elseif <SID>CheckArea('^-- $','^$')
- setlocal fo-=a fo-=w fo-=t
- "echo 'Signature (fo='.&fo.')'
- elseif s:synCur =~ '^mail'
- " if <SID>CheckArea('\v^From( |: ).*\n','\v^$')
- setlocal fo-=a fo-=w fo-=t
- "echo 'Header (fo='.&fo.')'
- else
- "echo 'My text (fo='.&fo.')'
- endif
-endfunction
-
-function! s:CheckArea(start, end)
- return (search(a:start,'bcnW')-line('.')) >
- \ (search(a:end,'bnW')-line('.'))
-endfunction
-
-function! FixQuotes()
- let l:i = 0
- let l:lineNxt = getline(l:i)
- let l:synNxt = synIDattr(synID(l:i,1,0),"name")
- while l:i < line('$')-1
- let l:lineCur = l:lineNxt
- let l:synCur = l:synNxt
- let l:lineNxt = getline(l:i+1)
- let l:synNxt = synIDattr(synID(l:i+1,1,0),"name")
- if l:synCur =~ '^mailQuote' && l:lineCur =~ '\w.*\S$' &&
- \ l:synNxt =~ '^mailQuote' && l:lineNxt =~ '\w'
- call setline(l:i, l:lineCur . ' ')
- endif
- let l:i += 1
- endwhile
-endfunction
-
-augroup fixquotes
- au!
- autocmd BufWinEnter $TMPDIR/mutt-* call FixQuotes()
-augroup END
-
-nmap <buffer> <C-P><F1> :w<CR>:%!mailplate --keep-unknown official<CR>
-nmap <buffer> <C-P><F2> :w<CR>:%!mailplate --keep-unknown pobox<CR>
-nmap <buffer> <C-P><F3> :w<CR>:%!mailplate --keep-unknown tahi<CR>
-nmap <buffer> <C-P><F4> :w<CR>:%!mailplate --keep-unknown toni<CR>
-
-nmap <buffer> <C-P><F5> :w<CR>:%!mailplate --keep-unknown kbkg<CR>
-nmap <buffer> <C-P><F6> :w<CR>:%!mailplate --keep-unknown krafftwerk<CR>
-nmap <buffer> <C-P><F7> :w<CR>:%!mailplate --keep-unknown siby<CR>
-nmap <buffer> <C-P><F8> :w<CR>:%!mailplate --keep-unknown debian<CR>
-
-nmap <buffer> <C-P><F9> :w<CR>:%!mailplate --keep-unknown uniwh<CR>
-nmap <buffer> <C-P><F10> :w<CR>:%!mailplate --keep-unknown mtfk<CR>
-nmap <buffer> <C-P><F11> :w<CR>:%!mailplate --keep-unknown sudetia<CR>
-nmap <buffer> <C-P><F12> :w<CR>:%!mailplate --keep-unknown default<CR>
-nmap <buffer> <F1> :w<CR>:%!mailplate --auto --keep-unknown 2>/dev/null<CR>
-
-" change subject line
-" Before: Subject: old
-" After : Subject: New (was: old)
-" http://strcat.de/wiki/dotfiles#vim
-" map ,sw 1G/^Subject: <CR>:s/Re:/was:/<CR>Wi (<C-O>$)<ESC>0Whi
-map <Leader>ns 1G/^Subject: /<CR>:s,\(Subject: \)\(Re: \)*\(.*\)$,\1 (was: \3),<CR>:set nohls<CR>f li
-
-" Delete 'was' in the Subject.
-" Before: Subject: New (was: old)
-" After : Subject: New
-" http://strcat.de/wiki/dotfiles#vim
-map <Leader>dw 1G/^Subject: /<CR>:s, *(was: .*)$<CR>:set nohls<CR>f l
-
-" http://dollyfish.net.nz/blog/2008-04-01/mutt-and-vim-custom-autocompletion
-fun! LBDBCompleteFn(findstart, base)
- let line = getline('.')
- if a:findstart
- " locate the start of the word
- let start = col('.') - 1
- while start > 0 && line[start - 1] =~ '[^:,]'
- let start -= 1
- endwhile
- while start < col('.') && line[start] =~ '[:, ]'
- let start += 1
- endwhile
- return start
- else
- let res = []
- let query = substitute(a:base, '"', '', 'g')
- let query = substitute(query, '\s*<.*>\s*', '', 'g')
- for m in LbdbQuery(query)
- call complete_add(printf('"%s" <%s>', escape(m[0], '"'), m[1]))
- if complete_check()
- break
- endif
- endfor
- return res
- endif
-endfun
-set completefunc=LBDBCompleteFn
-
-" And this magic by James Vega, which ensures that we only complete with lbdb
-" on the recipient lines of the mail header.
-inoremap <expr> <C-n> DelegateCompletion(1)
-inoremap <expr> <C-p> DelegateCompletion(0)
-
-fun! DelegateCompletion(next)
- if getline('.') =~? '^\%(To\|B\=Cc\):'
- return "\x18\x15"
- elseif a:next
- return "\x0e"
- else
- return "\x10"
- endif
-endfun
-
-function! WriteMailBackup()
- let l:tmpdir = fnameescape((exists('$TMPDIR') ? expand('$TMPDIR') : '/tmp'))
- let l:tgtdir = l:tmpdir . '/mail-backups'
- call mkdir(l:tgtdir, "p", 0o700)
- let l:modified = &modified
- let l:filename = l:tgtdir . '/' . strftime('%Y-%m-%d-%H%M%S') . '.msg'
- exe 'silent update! ' . l:filename
- if 0 && l:modified
- echo 'Backup written to ' . l:filename
- endif
-endfunction
-autocmd BufWritePre <buffer> call WriteMailBackup()
-
-let g:markdown_in_mail = 1
-runtime! ftplugin/markdown.vim
projects / etc / vim.git / blobdiff