1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-18 18:05:07 +00:00

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
This commit is contained in:
Jim Porter 2021-05-01 11:56:19 +02:00 committed by Michael Albinus
parent 101a049f55
commit e61688f87d

View File

@ -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