From b64b3f7d777a7d6b05603e9662df0a692a52efe2 Mon Sep 17 00:00:00 2001 From: John Doty Date: Thu, 30 Apr 2020 09:42:44 -0700 Subject: [PATCH] [emacs] cider tramp what --- site-lisp/cider-buck.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/site-lisp/cider-buck.el b/site-lisp/cider-buck.el index 7ab6abe..ce17cd6 100644 --- a/site-lisp/cider-buck.el +++ b/site-lisp/cider-buck.el @@ -27,9 +27,10 @@ (defun cider-buck--nrepl-target () "Get the nrepl buck target of the specified file name." - (let ((src-file (buffer-file-name (current-buffer)))) + (let ((src-file (file-local-name (buffer-file-name (current-buffer))))) + (prin1 src-file) (with-temp-buffer - (let ((status (call-process "buck" nil (current-buffer) nil + (let ((status (process-file "buck" nil (current-buffer) nil "query" "owner('%s')" src-file))) (unless (eq status 0) (error (buffer-string)))