Emacs内からgit-grep

Emacs用のGitであれこれするようなのを使ってないので、こんなんでやってる。

(defun ggrep ()
  (interactive)
  (let ((grep-find-command "PAGER='' git grep -n --no-color "))
    (call-interactively 'grep-find)))