From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 16 Sep 2022 11:17:56 +0000 (+0300)
Subject: ; * lisp/vc/vc.el (vc-responsible-backend): Explain last change.
X-Git-Tag: emacs-29.0.90~1856^2~457
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f3277128e0e8741cf20c72c718c83e848cd92f2f;p=emacs.git

; * lisp/vc/vc.el (vc-responsible-backend): Explain last change.
---

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 05109256bd1..4688137d923 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -1014,6 +1014,10 @@ responsible for the given file."
                           (lambda (backend)
                             (when-let ((dir (vc-call-backend
                                              backend 'responsible-p file)))
+                              ;; We run DIR through `expand-file-name'
+                              ;; so that abbreviated directories, such
+                              ;; as "~/", wouldn't look "less specific"
+                              ;; due to their artificially shorter length.
                               (cons backend (expand-file-name dir))))
                           vc-handled-backends))))
         ;; Just a single response (or none); use it.