From: Dmitry Gutov <dmitry@gutov.dev>
Date: Thu, 3 Oct 2024 19:03:09 +0000 (+0300)
Subject: xref-location-marker: Use find-file-noselect to ensure uptodateness
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a8f644c194ffce4a1de44f099ba985cc02100f93;p=emacs.git

xref-location-marker: Use find-file-noselect to ensure uptodateness

* lisp/progmodes/xref.el (xref-location-marker):
Always call 'find-file-noselect' rather than 'get-file-buffer' to
go through the visited-file-modtime verification every time.

(cherry picked from commit a9e36fc3bf811853e152e7ff427a39272cff1a80)
---

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index a049c98e5ce..c0891598605 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -150,9 +150,8 @@ Line numbers start from 1 and columns from 0."
 (cl-defmethod xref-location-marker ((l xref-file-location))
   (pcase-let (((cl-struct xref-file-location file line column) l))
     (with-current-buffer
-        (or (get-file-buffer file)
-            (let ((find-file-suppress-same-file-warnings t))
-              (find-file-noselect file)))
+        (let ((find-file-suppress-same-file-warnings t))
+          (find-file-noselect file))
       (save-restriction
         (widen)
         (save-excursion