[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 1b1063a 4/4: Merge commit 'e5eb534859acc0cc0a13403fd166457
From: |
Alexey Veretennikov |
Subject: |
[elpa] master 1b1063a 4/4: Merge commit 'e5eb534859acc0cc0a13403fd166457db9fb7eb5' |
Date: |
Sun, 25 Sep 2016 14:21:21 +0000 (UTC) |
branch: master
commit 1b1063ac7b7f10f37a09cd7f72c0f3ea53fbe442
Merge: 8c09e73 e5eb534
Author: Alexey Veretennikov <address@hidden>
Commit: Alexey Veretennikov <address@hidden>
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."