branch: master
commit 2d4037320fcc602692f8619ca4e1b5adff5648de
Author: Dmitry Gutov <dgu...@yandex.ru>
Commit: Dmitry Gutov <dgu...@yandex.ru>
Update diff-hl-flydiff/vc-git-mode-line-string as per Emacs master
---
diff-hl-flydiff.el | 6 ++++--
1 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index b5f6b4c..02169cc 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -57,9 +57,11 @@
(disp-rev (or (vc-git--symbolic-ref file)
(substring rev 0 7)))
(def-ml (vc-default-mode-line-string 'Git file))
- (help-echo (get-text-property 0 'help-echo def-ml)))
+ (help-echo (get-text-property 0 'help-echo def-ml))
+ (face (get-text-property 0 'face def-ml)))
(propertize (replace-regexp-in-string (concat rev "\\'") disp-rev
def-ml t t)
- 'help-echo (concat help-echo "\nCurrent revision: " rev))))
+ 'face face
+ 'help-echo (concat help-echo "\nCurrent revision: " rev))))
(advice-add 'vc-git-working-revision :override
#'diff-hl-flydiff/vc-git-working-revision)
