fix(emacs): eshell tramp prompt

This commit is contained in:
2025-12-20 13:59:27 -07:00
parent 898f29d6c6
commit ab264274ec

View File

@@ -118,7 +118,7 @@ when the input is empty."
(defun syd-split-tramp-file-name (file-name)
"Split FILE-NAME into (TRAMP-PREFIX . LOCAL-NAME). Returns (nil . FILE-NAME)
if FILE-NAME has no TRAMP prefix."
(if (tramp-tramp-file-p file-name)
(if (and (featurep 'tramp) (tramp-tramp-file-p file-name))
(let* ((dissected (tramp-dissect-file-name file-name t))
(localname (tramp-file-name-localname dissected)))
(setf (tramp-file-name-localname dissected) nil)