fix(emacs): Load TRAMP when needed
This commit is contained in:
@@ -138,6 +138,7 @@ If FORCE-P, delete without confirmation."
|
|||||||
(defun syd-split-tramp-file-name (file-name)
|
(defun syd-split-tramp-file-name (file-name)
|
||||||
"Split FILE-NAME into (TRAMP-PREFIX . LOCAL-NAME). Returns (nil . FILE-NAME)
|
"Split FILE-NAME into (TRAMP-PREFIX . LOCAL-NAME). Returns (nil . FILE-NAME)
|
||||||
if FILE-NAME has no TRAMP prefix."
|
if FILE-NAME has no TRAMP prefix."
|
||||||
|
(require 'tramp)
|
||||||
(if (tramp-tramp-file-p file-name)
|
(if (tramp-tramp-file-p file-name)
|
||||||
(let* ((dissected (tramp-dissect-file-name file-name t))
|
(let* ((dissected (tramp-dissect-file-name file-name t))
|
||||||
(localname (tramp-file-name-localname dissected)))
|
(localname (tramp-file-name-localname dissected)))
|
||||||
|
|||||||
Reference in New Issue
Block a user