diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2022-02-15 18:13:04 +0100 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2022-02-15 18:13:04 +0100 |
commit | 5b7752a865f22171a6389b6c26dd13ad7009a2de (patch) | |
tree | d97e28b5b9d8cab0dcbe65347837540385e3b5e7 | |
parent | 38f6ea1df00075dcafbd6946ed6045f026853755 (diff) | |
download | emacs-5b7752a865f22171a6389b6c26dd13ad7009a2de.tar.gz |
Fix problem with popd for in remote shell buffers
* lisp/shell.el (shell-prefixed-directory-name):
Use `file-local-name' for DIR. (Bug#53927)
-rw-r--r-- | lisp/shell.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index ffaeb61c0e7..c9def1bb3f3 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -941,7 +941,7 @@ Environment variables are expanded, see function `substitute-in-file-name'." dir (if (file-name-absolute-p dir) ;; The name is absolute, so prepend the prefix. - (concat comint-file-name-prefix dir) + (concat comint-file-name-prefix (file-local-name dir)) ;; For relative name we assume default-directory already has the prefix. (expand-file-name dir)))) |