commit c27df03ea824ff238691d3e4c20f662611e3fe10 from: Omar Polo date: Sun Jan 03 10:24:32 2021 UTC print more info in vc-got-dir-extra-headers added repository path and remote url to vc-got-dir-extra-headers commit - 8b635a9f0f8c22640d8e129df31a514deace0679 commit + c27df03ea824ff238691d3e4c20f662611e3fe10 blob - 81c60b38ef7c747d6edd8f051af60c9b0c442f7f blob + 261eeb11b2a6160b351b36d662c6e398d8fefad1 --- vc-got.el +++ vc-got.el @@ -387,10 +387,14 @@ DIR-OR-FILE." (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."