Fix problem with popd for in remote shell buffers

* lisp/shell.el (shell-prefixed-directory-name):
Use `file-local-name' for DIR.  (Bug#53927)
This commit is contained in:
Michael Albinus 2022-02-15 18:13:04 +01:00
parent 38f6ea1df0
commit 5b7752a865

View file

@ -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))))