Ggrep for <cword> (in current dir or in git root)

ggrepcword.vim

function! GitRoot()
    let cmd="git rev-parse --show-toplevel"
    let result=system(cmd)
    if v:shell_error
        echom "Error: [".result."] (\"".result."\")"
        echom "Command: [".cmd."]"
        return expand("%:p:h/")
    endif
    return result
endfunction

function! QFGGrep(path)
    " let needle = s:get_visual_selection()
    let needle = expand("<cword>")
    execute "silent botright Ggrep -i ".needle." ".a:path
    cwindow
endfunction

nnoremap <Leader>gg :call QFGGrep(expand("%:p:h/"))<CR>
nnoremap <Leader>ga :call QFGGrep(GitRoot())<CR>