From: Jim Porter <jporterbugs@gmail.com>
Date: Sat, 1 May 2021 09:56:19 +0000 (+0200)
Subject: Fix setting breakpoints in M-x gdb for remote files.  Don't merge
X-Git-Tag: emacs-28.0.90~2617^2~2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e61688f87d;p=emacs.git

Fix setting breakpoints in M-x gdb for remote files.  Don't merge

* lisp/progmodes/gdb-mi.el (gdb-jsonify-buffer): Fix modification
of GDB/MI "fullname" property for remote files
---

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 65fe997341c..1b2642fae70 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -2696,7 +2696,7 @@ If `default-directory' is remote, full file names are adapted accordingly."
     (let ((remote (file-remote-p default-directory)))
       (when remote
         (goto-char (point-min))
-        (while (re-search-forward "[\\[,]fullname=\"\\(.+\\)\"" nil t)
+        (while (re-search-forward "[\\[,]fullname=\"\\(.+?\\)\"" nil t)
           (replace-match (concat remote "\\1") nil nil nil 1))))
     (goto-char (point-min))
     (when fix-key