Fix 'vc-git--program-version'

* lisp/vc/vc-git.el (vc-git--program-version): Fix the function to
work with Git for Windows.

1 files changed, 5 insertions, 2 deletions

diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 40aa0b26010..7ebb72f2706 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -239,8 +239,11 @@ Should be consistent with the Git config value i18n.logOutputEncoding."
              (vc-git--run-command-string nil "version")))
         (setq vc-git--program-version
               (if (and version-string
-                       (string-match "git version \\([0-9.]+\\)$"
-                                     version-string))
+                       ;; Git for Windows appends ".windows.N" to the
+                       ;; numerical version reported by Git.
+                       (string-match
+                        "git version \\([0-9.]+\\)\\(\.windows.[0-9]+\\)$"
+                        version-string))
                   (match-string 1 version-string)
                 "0")))))