From 7fcdabdcb03a47ec028a5821f6c3fc054d00b40d Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Mon, 21 Jan 2019 11:34:32 +0100 Subject: [PATCH] * lisp/net/tramp-sh.el (tramp-set-remote-path): Fix usage of tmpfile. --- lisp/net/tramp-sh.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 4fa8b3fa3f1..dfb4b84517f 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el @@ -3973,9 +3973,11 @@ variable PATH." (if (< (length command) pipe-buf) (tramp-send-command vec command) ;; Use a temporary file. - (setq tmpfile (tramp-make-tramp-temp-file vec)) + (setq tmpfile + (tramp-make-tramp-file-name vec (tramp-make-tramp-temp-file vec))) (write-region command nil tmpfile) - (tramp-send-command vec (format ". %s" tmpfile)) + (tramp-send-command + vec (format ". %s" (tramp-compat-file-local-name tmpfile))) (delete-file tmpfile)))) ;; ------------------------------------------------------------ -- 2.39.2