fix(emacs): eshell tramp prompt
This commit is contained in:
1 parent
898f29d6c6
commit
ab264274ec
1 file changed
+1
-1
@@ -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)
|
||||
|
||||
Reference in new issue
Block a user