[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 5eaa2d2 1/3: Improve path-iterator
From: |
Stephen Leake |
Subject: |
[elpa] master 5eaa2d2 1/3: Improve path-iterator |
Date: |
Sun, 3 Feb 2019 19:38:35 -0500 (EST) |
branch: master
commit 5eaa2d2e7197f530ad7b962e5255718182bfcc40
Author: Stephen Leake <address@hidden>
Commit: Stephen Leake <address@hidden>
Improve path-iterator
* packages/path-iterator/path-iterator.el (path-iter--to-truename):
Enforce directory-file-name.
---
packages/path-iterator/path-iterator.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/packages/path-iterator/path-iterator.el
b/packages/path-iterator/path-iterator.el
index 1c57ce3..6bd3504 100644
--- a/packages/path-iterator/path-iterator.el
+++ b/packages/path-iterator/path-iterator.el
@@ -131,7 +131,7 @@ If an element of PATH is nil, `default-directory' is used."
(expand-file-name name)
default-directory)))
(when (file-directory-p absname)
- (push (file-truename absname) result))
+ (push (directory-file-name (file-truename absname)) result))
))
path)
(nreverse result)))