set cursorline
endif
+" Highlight all matches on the screen when searching. Use <C-L> (see below) to
+" remove the highlighting until the next search.
+set hlsearch
+
" Display tabs, trailing space, non breakable spaces and long lines (when
" wrapping is disabled).
set list
function! s:VSetSearch()
let l:temp = @@
normal! gvy
- let @/ = '\V' . substitute(escape(@@, '\'), '\n', '\\n', 'g')
+ " Added \C to force 'noignorecase' while searching the current visual
+ " selection. I want to search for the exact string in this case.
+ let @/ = '\C' . '\V' . substitute(escape(@@, '\'), '\n', '\\n', 'g')
let @@ = l:temp
endfunction
vnoremap * :<C-U>call <SID>VSetSearch()<CR>//<CR>