emacs git frontend

gistfile1.cl

;; I never got comfortable with the existing emacs frontends to git.
;; So I wrote my own.

;; An awesome emacs git client!
(require 'eshell)
(defun awesome-git-client ()
  "The best emacs git client!"
  (interactive)
  (eshell))
(defun my-eshell-path-setting-hook ()
  (progn (let* ((old-path (getenv "PATH"))
                (new-path (concat old-path ":"
                                  "/usr/local/git/bin")))
           (progn (message new-path)
                  (setenv "PATH" new-path)))
         ;; We can probably do something clever with $GIT_PAGER here
         ;; too.
         (setenv "EDITOR" "emacsclient")))
(add-hook 'eshell-term-load-hook 'my-eshell-path-setting-hook)

;; It isn't quite as hardcore as it sounds, is it?