Как мне показать статус git в нижней строке emacs?

Question

Есть ли способ показать текущую ветку, плюсы, минусы и авторов в строке состояния emacs? Что-то вроде:

-UU-:**--F1 buildfile Top (84,16) (Ruby Paredit AC yas Fill) ---(git: master +2/-4 Jake Pearson

Answer 1

Я придумал это:

(defadvice vc-git-mode-line-string (after plus-minus (file) compile activate)
  (setq ad-return-value
    (concat ad-return-value
            (let ((plus-minus (vc-git--run-command-string
                               file "diff" "--numstat" "--")))
              (and plus-minus
                   (string-match "^\\([0-9]+\\)\t\\([0-9]+\\)\t" plus-minus)
                   (format " +%s-%s" (match-string 1 plus-minus) (match-string 2 plus-minus)))))))

который помещает Git:master +9-2 в мою строку режима.

Не уверен, что вы подразумеваете под автором - это будет автором последнего коммита? Если так, это, кажется, работает:

(defadvice vc-git-mode-line-string (after author (file) compile activate)
  (setq ad-return-value
        (concat ad-return-value
                (let ((author
                       (vc-git--run-command-string file "log" "-n1" "--pretty=format:%an" "--")))
                  (when author
                    (concat " " author))))))

Answer 2

Вы пробовали emacs-powerline?