emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/realgud d21f338ebe 1/2: Support tramp buffers in comman


From: ELPA Syncer
Subject: [elpa] externals/realgud d21f338ebe 1/2: Support tramp buffers in command expansion
Date: Wed, 27 Sep 2023 21:58:48 -0400 (EDT)

branch: externals/realgud
commit d21f338ebee075d24066c2ff90f335d6592991ae
Author: Jeremy Weed <JeremyWeed@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    Support tramp buffers in command expansion
---
 realgud/common/send.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/realgud/common/send.el b/realgud/common/send.el
index 7ae006feaf..a5363a0725 100644
--- a/realgud/common/send.el
+++ b/realgud/common/send.el
@@ -149,7 +149,8 @@ taken from current buffer, or OPT-BUFFER if non-nil.  Some
 %p and %s are replaced by an empty string if OPT-STR is nil."
   (let* ((buffer (or opt-buffer (current-buffer)))
         (srcbuf (realgud-get-srcbuf buffer))
-        (src-file-name (and srcbuf (buffer-file-name srcbuf)))
+        (src-file-name-raw (and srcbuf (buffer-file-name srcbuf)))
+         (src-file-name (if (file-remote-p src-file-name-raw) (file-remote-p 
src-file-name-raw 'localname) src-file-name-raw))
         result)
     (while (and fmt-str
                (let ((case-fold-search nil))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]