branch: elpa/inf-ruby
commit 7337255b0b720a35c2c6e3267f2ee040f8d7fee7
Author: Pritam Baral <pri...@pritambaral.com>
Commit: Pritam Baral <pri...@pritambaral.com>
Add support for TRAMP
We already support running inferior ruby processes over remote
connections via TRAMP. But the ruby-send-* functions use the full file
name when sending code over, which includes the remote path. This
renders ruby's code introspection useless because source locations use
filenames that ruby cannot understand.
For example, if sending code from a file /tmp/example.rb on TRAMP remote
/ssh:remote:, the ruby source locations end up as
'/ssh:remote:/tmp/example.rb'.
This change makes inf-ruby strip the remote path when sending filenames
to the inferior ruby process. For compatibility with Emacs versions
older than 26.1, it avoids using (file-local-name).
---
inf-ruby.el | 13 +++++++++++--
1 file changed, 11 insertions(+), 2 deletions(-)
diff --git a/inf-ruby.el b/inf-ruby.el
index d7ec4d809c..c65129db51 100755
--- a/inf-ruby.el
+++ b/inf-ruby.el
@@ -484,6 +484,14 @@ Must not contain ruby meta characters.")
(defconst ruby-eval-separator "")
+(defun inf-ruby-file-local-name (filename)
+ "Convert FILENAME so that it can be passed to an inferior Ruby
+process running over TRAMP, by removing the remote part of it."
+ ;; TODO: Replace this implementation with (file-local-name ...) when the
+ ;; oldest supported Emacs version is bumped to 26.1
+ (or (file-remote-p filename 'localname)
+ filename))
+
(defun ruby-send-region (start end &optional print prefix suffix line-adjust)
"Send the current region to the inferior Ruby process."
(interactive "r\nP")
@@ -508,7 +516,8 @@ Must not contain ruby meta characters.")
(setq line (+ line line-adjust)))
(comint-send-string (inf-ruby-proc) (format "eval <<'%s', %s, %S, %d\n"
term inf-ruby-eval-binding
- file line))
+ (inf-ruby-file-local-name file)
+ line))
(if prefix
(comint-send-string (inf-ruby-proc) prefix))
(comint-send-region (inf-ruby-proc) start end)
@@ -797,7 +806,7 @@ Then switch to the process buffer."
(setq ruby-prev-l/c-dir/file (cons (file-name-directory file-name)
(file-name-nondirectory file-name)))
(comint-send-string (inf-ruby-proc) (concat "(load \""
- file-name
+ (inf-ruby-file-local-name
file-name)
"\"\)\n")))
(defun ruby-load-current-file ()
