From de265a0c6ef8b1296d5a6130cb87b6dc74286b67 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Mon, 28 Jun 2021 08:14:10 +0200 Subject: [PATCH] Fix bug#49229 in shell.el * lisp/shell.el (shell): Ensure, that a remote shell is remote. (Bug#49229) --- lisp/shell.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/shell.el b/lisp/shell.el index 62de5be8172..4339e8c0a3b 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -759,7 +759,8 @@ Make the shell buffer the current buffer, and return it. (file-local-name (expand-file-name (read-file-name "Remote shell path: " default-directory - shell-file-name t shell-file-name))))) + shell-file-name t shell-file-name + #'file-remote-p))))) ;; Rain or shine, BUFFER must be current by now. (unless (comint-check-proc buffer) -- 2.39.2