set dictionary=spell " list of dictionary files for keyword completion
" Spell Check http://tex.stackexchange.com/a/52932
let b:myLang=0
-let g:myLangList=["nospell","en_gb","en_us","de","fr"]
+let g:myLangList=["en_gb","en_us","de","fr"]
+
function! ToggleSpell()
- let b:myLang=b:myLang+1
- if b:myLang>=len(g:myLangList) | let b:myLang=0 | endif
- if b:myLang==0
- setlocal nospell
- else
- execute "setlocal spell spelllang=".get(g:myLangList, b:myLang)
+ 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
- echo "spell checking language:" g:myLangList[b:myLang]
+ execute "setlocal spell spelllang=".get(g:myLangList, b:myLang)
+ echo "setlocal spelllang=" g:myLangList[b:myLang]
endfunction
-map <F10> :call ToggleSpell()<CR>
-imap <F10> <C-O>:call ToggleSpell()<CR>
+nnoremap <silent> <Leader>S :call SwitchSpell()<CR>
+
+" fix spelling with first choice
+nnoremap <Leader>f 1z=
if has("autocmd")
au Filetype *