diff options
author | René Neumann <rene.neumann@in.tum.de> | 2012-09-04 16:20:28 +0200 |
---|---|---|
committer | René Neumann <rene.neumann@in.tum.de> | 2012-09-04 16:20:29 +0200 |
commit | 9d8238cef09d8cb7c270b616ec56a335e0ac0854 (patch) | |
tree | a7857c65ec06a48dd575d604539d331a90c01463 /.vim/plugin/scmCloseParens.vim | |
parent | 08ae3f83268783edd51dd97a749c088007f7fea4 (diff) | |
download | dotfiles-9d8238cef09d8cb7c270b616ec56a335e0ac0854.tar.gz dotfiles-9d8238cef09d8cb7c270b616ec56a335e0ac0854.tar.bz2 dotfiles-9d8238cef09d8cb7c270b616ec56a335e0ac0854.zip |
Move to bundles in vim -- also remove old craft
Diffstat (limited to '')
-rw-r--r-- | .vim/plugin/scmCloseParens.vim | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/.vim/plugin/scmCloseParens.vim b/.vim/plugin/scmCloseParens.vim deleted file mode 100644 index 8aca684..0000000 --- a/.vim/plugin/scmCloseParens.vim +++ /dev/null @@ -1,58 +0,0 @@ -" Description: Simple script (hack ?) that closes opened parens -" Author: Adrien Pierard <pierarda#iro.umontreal.ca> -" Modified: 04/05/07 -" Version: 0.1 -" -" Usage: I mapped it to <Leader>p -" So, just go to normal mode, and type the shortcut, or :call -" RunScmCloseParens() yourself - - -let b:msg = "" -let b:bcpt = 0 - -function! SetCursorWhereItIsGoodToPutItEh() - let line = substitute(getline("."), "\\s\\+$", "", "") - call setline(line("."),line) - norm $ - let charUnderCursor = strpart(line("."), col(".") - 1, 1) - norm a) - call CountAsMuchAsPossible() -endfunction - -function! CountAsMuchAsPossible() - let cpt = 0 - while (CanWeGoOn() > 0) - let cpt = cpt + 1 - call OhGetBackAndSetAnotherOne() - endwhile - let line = substitute(getline("."), ")$", "", "") - call setline(line("."),line) - let b:cpt = cpt -endfunction - -function! CanWeGoOn() - return (searchpair('(', '', ')' , 'b' )) -endfunction - -function! OhGetBackAndSetAnotherOne() - call searchpair('(', '', ')') - norm a) - -endfunction - -function! InitScmCloseParens() - if ! exists("g:ScmCloseParens") - let g:ScmCloseParens = "Scheme on you !" - execute 'nmap <Leader>p :call RunScmCloseParens()<Cr>' - endif -endfunction - -fun! RunScmCloseParens() - let b:bcpt = 0 - call SetCursorWhereItIsGoodToPutItEh() - norm :echo b:bcpt -endfunction - -call InitScmCloseParens() - |