diff options
Diffstat (limited to 'tex/context/base/mkxl/lpdf-ini.lmt')
| -rw-r--r-- | tex/context/base/mkxl/lpdf-ini.lmt | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/tex/context/base/mkxl/lpdf-ini.lmt b/tex/context/base/mkxl/lpdf-ini.lmt index ea9466d39..785242b8a 100644 --- a/tex/context/base/mkxl/lpdf-ini.lmt +++ b/tex/context/base/mkxl/lpdf-ini.lmt @@ -171,14 +171,12 @@ local tosixteen, fromsixteen, topdfdoc, frompdfdoc, toeight, fromeight do - local escaped = Cs(Cc("(") * (S("\\()\n\r\t\b\f")/"\\%0" + P(1))^0 * Cc(")")) - local cache = table.setmetatableindex(function(t,k) -- can be made weak local v = utfbyte(k) if v < 0x10000 then v = format("%04x",v) else - v = format("%04x%04x",rshift(v,10),v%1024+0xDC00) + v = format("%04x%04x",rshift(v,10)+0xD800,v%1024+0xDC00) end t[k] = v return v @@ -222,6 +220,7 @@ do local toregime = regimes.toregime local fromregime = regimes.fromregime + local escaped = Cs(Cc("(") * (S("\\()\n\r\t\b\f")/"\\%0" + P(1))^0 * Cc(")")) topdfdoc = function(str,default) if not str or str == "" then |