On Sat, Jun 10, 2006 at 09:27:50PM +0200, Yakov Lerner wrote:
> " remap f,F to be multi-line. Supports counter before f,F.
> " finds special chars properly. Yakov Lerner
> noremap <silent>f :call OneCharSearch(1)<CR>
> noremap <silent>F :call OneCharSearch(0)<cr>
> noremap ; n
> noremap , N
> function! OneCharSearch(forward) range
> " op is '/' or '?'
> let x= getchar()
> let c=nr2char(x)
> echo 'c='.c
> if x == 27 | return | endif
> if c == '\' | let x='\\' | endif
also escape /
if c == '/' | let x='\/' | endif
> let Count= (v:count==0 ? 1 : v:count)
> if a:forward
> silent! exe "norm ".Count."/\\V".c."\<cr>"
> else
> silent! exe "norm ".Count."?\\V'.c."\<cr>"
^ typo
> endif
> endfun
>
> Yakov
Yakov: That's great. I love it.
Marc
