From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 7 Jun 2022 11:23:22 +0000 (+0200)
Subject: Simplify mode line for vc-print-root-log
X-Git-Tag: emacs-29.0.90~1910^2~176
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=254d2a147760f83fa83d361eb6027ffa4000c2d9;p=emacs.git

Simplify mode line for vc-print-root-log

* lisp/vc/vc.el (vc-print-root-log): Don't display "from <file>"
(bug#45007).
---

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 3508f684c49..d6f0f4a4977 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -2654,7 +2654,10 @@ with its diffs (if the underlying VCS supports that)."
         (error "Directory is not version controlled")))
     (setq default-directory rootdir)
     (vc-print-log-internal backend (list rootdir) revision revision limit
-                           (when with-diff 'with-diff))))
+                           (when with-diff 'with-diff))
+    ;; We're looking at the root, so displaying " from <some-file>" in
+    ;; the mode line isn't helpful.
+    (setq vc-parent-buffer-name nil)))
 
 ;;;###autoload
 (defun vc-print-branch-log (branch)