commit - 8b635a9f0f8c22640d8e129df31a514deace0679
commit + c27df03ea824ff238691d3e4c20f662611e3fe10
blob - 81c60b38ef7c747d6edd8f051af60c9b0c442f7f
blob + 261eeb11b2a6160b351b36d662c6e398d8fefad1
--- vc-got.el
+++ vc-got.el
(push s res)))
finally (funcall update-function res nil))))
-(defun vc-got-dir-extra-headers (_dir)
- (concat
- (propertize "Branch : " 'face 'font-lock-type-face)
- (vc-got--current-branch)))
+(defun vc-got-dir-extra-headers (dir)
+ "Return a string for the `vc-dir' buffer heading for directory DIR."
+ (concat (propertize "Repository : " 'face 'font-lock-type-face)
+ (vc-got--repo-root) "\n"
+ (propertize "Remote URL : " 'face 'font-lock-type-face)
+ (vc-got-repository-url dir) "\n"
+ (propertize "Branch : " 'face 'font-lock-type-face)
+ (vc-got--current-branch)))
(defun vc-got-working-revision (file)
"Return the id of the last commit that touched the FILE or \"0\" for a new (but added) file."