diff options
| author | Hans Hagen <pragma@wxs.nl> | 2014-03-22 15:31:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2014-03-22 15:31:00 +0100 |
| commit | c70b2e466bbb07e976f8684d56ae4e5398169e7d (patch) | |
| tree | d644f87f32feeddcfb2de6e8ebe6667423eb0be4 /tex/context/base/data-exp.lua | |
| parent | 244a447d70f406e1341a56016564518013496a32 (diff) | |
| download | context-c70b2e466bbb07e976f8684d56ae4e5398169e7d.tar.gz | |
beta 2014.03.22 15:31
Diffstat (limited to 'tex/context/base/data-exp.lua')
| -rw-r--r-- | tex/context/base/data-exp.lua | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tex/context/base/data-exp.lua b/tex/context/base/data-exp.lua index c67e97bb1..9534e73a0 100644 --- a/tex/context/base/data-exp.lua +++ b/tex/context/base/data-exp.lua @@ -123,7 +123,7 @@ local function splitpathexpr(str, newlist, validate) -- I couldn't resist lpeggi local old = str str = lpegmatch(l_rest, str) until old == str - until old == str -- or not find(str,"{") + until old == str -- or not find(str,"{",1,true) str = lpegmatch(stripper_1,str) if validate then for s in gmatch(str,"[^,]+") do @@ -191,7 +191,7 @@ function resolvers.cleanpath(str) -- tricky, maybe only simple paths report_expansions("no home dir set, ignoring dependent paths") end function resolvers.cleanpath(str) - if not str or find(str,"~") then + if not str or find(str,"~",1,true) then return "" -- special case else return lpegmatch(cleanup,str) |