diff options
| author | Leo Liu | 2016-04-27 22:12:12 +0800 |
|---|---|---|
| committer | Leo Liu | 2016-04-27 22:12:12 +0800 |
| commit | 71fb0e06e7e04d8300be10feffd3d314a76b4d27 (patch) | |
| tree | b027ed8abc0b62afa2a32a1f197010dcc109f53c | |
| parent | 6858e77c410a2bbaa96897a0283cf9571de9007b (diff) | |
| download | emacs-71fb0e06e7e04d8300be10feffd3d314a76b4d27.tar.gz emacs-71fb0e06e7e04d8300be10feffd3d314a76b4d27.zip | |
Improve last change to vc-git-mode-line-string
* lisp/vc/vc-git.el (vc-git-mode-line-string): Better fix that caches
the result.
| -rw-r--r-- | lisp/vc/vc-git.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index d5ba0c8be7d..f35c84d50c5 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el | |||
| @@ -278,7 +278,7 @@ Should be consistent with the Git config value i18n.logOutputEncoding." | |||
| 278 | 278 | ||
| 279 | (defun vc-git-mode-line-string (file) | 279 | (defun vc-git-mode-line-string (file) |
| 280 | "Return a string for `vc-mode-line' to put in the mode line for FILE." | 280 | "Return a string for `vc-mode-line' to put in the mode line for FILE." |
| 281 | (let* ((rev (vc-git-working-revision file)) | 281 | (let* ((rev (vc-working-revision file 'Git)) |
| 282 | (disp-rev (or (vc-git--symbolic-ref file) | 282 | (disp-rev (or (vc-git--symbolic-ref file) |
| 283 | (substring rev 0 7))) | 283 | (substring rev 0 7))) |
| 284 | (def-ml (vc-default-mode-line-string 'Git file)) | 284 | (def-ml (vc-default-mode-line-string 'Git file)) |