branch: master
commit 1b1063ac7b7f10f37a09cd7f72c0f3ea53fbe442
Merge: 8c09e73 e5eb534
Author: Alexey Veretennikov <alexey.veretenni...@gmail.com>
Commit: Alexey Veretennikov <alexey.veretenni...@gmail.com>

    Merge commit 'e5eb534859acc0cc0a13403fd166457db9fb7eb5'
    
    Added fix for debbugs 24200 debbugs.gnu.org/24200 proposed by Michael 
Albinus
---
 packages/ztree/ztree-util.el |    9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/packages/ztree/ztree-util.el b/packages/ztree/ztree-util.el
index 07935b7..39975b0 100644
--- a/packages/ztree/ztree-util.el
+++ b/packages/ztree/ztree-util.el
@@ -67,14 +67,7 @@ Used since `car-safe' returns nil for atoms"
 
 (defun ztree-untrampify-filename (file)
   "Return FILE as the local file name."
-  ;; FIXME: We shouldn't use internal Tramp functions.
-  (require 'tramp)
-  (declare-function tramp-tramp-file-p "tramp" (name))
-  (declare-function tramp-file-name-localname "tramp" (vec))
-  (declare-function tramp-dissect-file-name "tramp" (name &optional nodefault))
-  (if (not (tramp-tramp-file-p file))
-      file
-    (tramp-file-name-localname (tramp-dissect-file-name file))))
+  (or (file-remote-p file 'localname) file))
 
 (defun ztree-quotify-string (str)
   "Surround STR with quotes."

Reply via email to