feat(emacs): Library additions
- Fixes bug with TRAMP Eshell prompt
This commit is contained in:
@@ -4,6 +4,7 @@
|
||||
(require 'syd-buffers)
|
||||
(require 'cl-lib)
|
||||
(eval-when-compile (require 'cl-lib))
|
||||
(eval-when-compile (require 'tramp))
|
||||
|
||||
(syd-define-stub
|
||||
syd/copy-this-file
|
||||
@@ -149,7 +150,6 @@ If FORCE-P, delete without confirmation."
|
||||
(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."
|
||||
(require 'tramp)
|
||||
(if (tramp-tramp-file-p file-name)
|
||||
(let* ((dissected (tramp-dissect-file-name file-name t))
|
||||
(localname (tramp-file-name-localname dissected)))
|
||||
|
||||
Reference in New Issue
Block a user