summaryrefslogtreecommitdiff
path: root/otfl-font-ltx.lua
diff options
context:
space:
mode:
authorElie Roux <elie.roux@telecom-bretagne.eu>2013-04-19 00:26:56 -0700
committerElie Roux <elie.roux@telecom-bretagne.eu>2013-04-19 00:26:56 -0700
commitf01d69e79b4016db76e7672660f82db3bd6df7ed (patch)
treefee389d4852b60e4c40db0168c6e7782a48c4b03 /otfl-font-ltx.lua
parenta9510469b60edeceedf72811e7737ea0f3c56dc5 (diff)
parent79fd3d94527ecaad80cb4352a5650788a9e971df (diff)
downloadluaotfload-f01d69e79b4016db76e7672660f82db3bd6df7ed.tar.gz
Merge pull request #3 from phi-gamma/experimental
fix font syntax parser
Diffstat (limited to 'otfl-font-ltx.lua')
-rw-r--r--otfl-font-ltx.lua4
1 files changed, 3 insertions, 1 deletions
diff --git a/otfl-font-ltx.lua b/otfl-font-ltx.lua
index d1799d7..afc8621 100644
--- a/otfl-font-ltx.lua
+++ b/otfl-font-ltx.lua
@@ -128,7 +128,9 @@ local function iskey (k,v) feature_list[k] = v end
local P, S, R, C = lpeg.P, lpeg.S, lpeg.R, lpeg.C
local spaces = P(" ")^0
-local namespec = (1-S("/:("))^0 -- was: (1-S("/: ("))^0
+--local namespec = (1-S("/:("))^0 -- was: (1-S("/: ("))^0
+--[[phg-- this prevents matching of absolute paths as file names --]]--
+local namespec = (1-S("/:("))^1
local filespec = (R("az", "AZ") * P(":"))^-1 * (1-S(":("))^1
local stylespec = spaces * P("/") * (((1-P(":"))^0)/isstyle) * spaces
local filename = (P("file:")/isfile * (filespec/thename)) + (P("[") * P(true)/isname * (((1-P("]"))^0)/thename) * P("]"))