Commit Diff


commit - 986bd9a0366c6483c1749aa79459b612c0752853
commit + df20ca2725ebd6753073d5f9827aa22bb67dc3eb
blob - 6b0b0c04268b44d1114afab446a90e945f56864e
blob + f57e873a30788c55d2c19258b0fd57adc5ddd086
--- vc-got.el
+++ vc-got.el
@@ -118,6 +118,12 @@ If nil, use the value of `vc-diff-switches'.  If t, us
                  (repeat :tag "Argument List" :value ("") string)))
 
 ;; helpers
+(defun vc-got--program-version ()
+  "Returns the version string of used `Got' command."
+  (let (process-file-side-effects)
+    (with-temp-buffer
+      (vc-got--call "-V")
+      (substring (buffer-string) 4 -1))))
 
 (defun vc-got-root (file)
   "Return the work tree root for FILE, or nil."