summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhilipp Gesang <phg42.2a@gmail.com>2013-07-14 16:07:58 +0200
committerPhilipp Gesang <phg42.2a@gmail.com>2013-07-14 16:07:58 +0200
commitaf6b5d35884ba2f45b4b0220e7be88afde6a0009 (patch)
tree79046acbb85bfada16f8f0c2ea1941d02eb0f9d5
parent5eb884d8fd73b5ddf1276f1aa408903712e78c51 (diff)
downloadluaotfload-af6b5d35884ba2f45b4b0220e7be88afde6a0009.tar.gz
fix path handling of luaotfload-tool on Win systems
-rwxr-xr-xluaotfload-tool.lua8
1 files changed, 8 insertions, 0 deletions
diff --git a/luaotfload-tool.lua b/luaotfload-tool.lua
index 17978f8..21f73d1 100755
--- a/luaotfload-tool.lua
+++ b/luaotfload-tool.lua
@@ -1022,8 +1022,16 @@ do
return lpegmatch (p_permissions, raw)
end
+ local trailingslashes = P"/"^1 * P(-1)
+ local stripslashes = C((1 - trailingslashes)^0)
+
local get_permissions = function (t, location)
+ if stringsub (location, #location) == "/" then
+ --- strip trailing slashes (lfs idiosyncrasy on Win)
+ location = lpegmatch (stripslashes, location)
+ end
local attributes = lfsattributes (location)
+
if not attributes and t == "f" then
attributes = get_tentative_attributes (location)
if not attributes then