| | 1 | " NOTE: You must, of course, install the ack script |
| | 2 | " in your path. |
| | 3 | " On Debian / Ubuntu: |
| | 4 | " sudo apt-get install ack-grep |
| | 5 | " On your vimrc: |
| | 6 | " let g:ackprg="ack-grep -H --nocolor --nogroup --column" |
| | 7 | " |
| | 8 | " With MacPorts: |
| | 9 | " sudo port install p5-app-ack |
| | 10 | |
| | 11 | " Location of the ack utility |
| | 12 | if !exists("g:ackprg") |
| | 13 | let g:ackprg="ack -H --nocolor --nogroup --column" |
| | 14 | endif |
| | 15 | |
| | 16 | function! s:Ack(cmd, args) |
| | 17 | redraw |
| | 18 | echo "Searching ..." |
| | 19 | |
| | 20 | " If no pattern is provided, search for the word under the cursor |
| | 21 | if empty(a:args) |
| | 22 | let l:grepargs = expand("<cword>") |
| | 23 | else |
| | 24 | let l:grepargs = a:args |
| | 25 | end |
| | 26 | |
| | 27 | " Format, used to manage column jump |
| | 28 | if a:cmd =~# '-g$' |
| | 29 | let g:ackformat="%f" |
| | 30 | else |
| | 31 | let g:ackformat="%f:%l:%c:%m" |
| | 32 | end |
| | 33 | |
| | 34 | let grepprg_bak=&grepprg |
| | 35 | let grepformat_bak=&grepformat |
| | 36 | try |
| | 37 | let &grepprg=g:ackprg |
| | 38 | let &grepformat=g:ackformat |
| | 39 | silent execute a:cmd . " " . l:grepargs |
| | 40 | finally |
| | 41 | let &grepprg=grepprg_bak |
| | 42 | let &grepformat=grepformat_bak |
| | 43 | endtry |
| | 44 | |
| | 45 | if a:cmd =~# '^l' |
| | 46 | botright lopen |
| | 47 | else |
| | 48 | botright copen |
| | 49 | endif |
| | 50 | |
| | 51 | " TODO: Document this! |
| | 52 | exec "nnoremap <silent> <buffer> q :ccl<CR>" |
| | 53 | exec "nnoremap <silent> <buffer> t <C-W><CR><C-W>T" |
| | 54 | exec "nnoremap <silent> <buffer> T <C-W><CR><C-W>TgT<C-W><C-W>" |
| | 55 | exec "nnoremap <silent> <buffer> o <CR>" |
| | 56 | exec "nnoremap <silent> <buffer> go <CR><C-W><C-W>" |
| | 57 | |
| | 58 | " If highlighting is on, highlight the search keyword. |
| | 59 | if exists("g:ackhighlight") |
| | 60 | let @/=a:args |
| | 61 | set hlsearch |
| | 62 | end |
| | 63 | |
| | 64 | redraw! |
| | 65 | endfunction |
| | 66 | |
| | 67 | function! s:AckFromSearch(cmd, args) |
| | 68 | let search = getreg('/') |
| | 69 | " translate vim regular expression to perl regular expression. |
| | 70 | let search = substitute(search,'\(\\<\|\\>\)','\\b','g') |
| | 71 | call s:Ack(a:cmd, '"' . search .'" '. a:args) |
| | 72 | endfunction |
| | 73 | |
| | 74 | command! -bang -nargs=* -complete=file Ack call s:Ack('grep<bang>',<q-args>) |
| | 75 | command! -bang -nargs=* -complete=file AckAdd call s:Ack('grepadd<bang>', <q-args>) |
| | 76 | command! -bang -nargs=* -complete=file AckFromSearch call s:AckFromSearch('grep<bang>', <q-args>) |
| | 77 | command! -bang -nargs=* -complete=file LAck call s:Ack('lgrep<bang>', <q-args>) |
| | 78 | command! -bang -nargs=* -complete=file LAckAdd call s:Ack('lgrepadd<bang>', <q-args>) |
| | 79 | command! -bang -nargs=* -complete=file AckFile call s:Ack('grep<bang> -g', <q-args>) |
git.r.bdr.sh / rbdr / dotfiles / blame_incremental