+" Spell Check http://tex.stackexchange.com/a/52932
+let b:myLang=0
+let g:myLangList=["en_gb","en_us","de","fr"]
+
+function! ToggleSpell()
+ execute "setlocal spell!"
+ if (&spell)
+ echo "setlocal spelllang=" g:myLangList[b:myLang]
+ endif
+endfunction
+nnoremap <silent> <Leader>s :call ToggleSpell()<CR>
+
+function! SwitchSpell()
+ if (&spell)
+ let b:myLang=b:myLang+1
+ if b:myLang>=len(g:myLangList) | let b:myLang=0 | endif
+ endif
+ execute "setlocal spell spelllang=".get(g:myLangList, b:myLang)
+ echo "setlocal spelllang=" g:myLangList[b:myLang]
+endfunction
+nnoremap <silent> <Leader>S :call SwitchSpell()<CR>
+
+" fix spelling with first choice
+nnoremap <Leader>f 1z=