diff options
| author | Hans Hagen <pragma@wxs.nl> | 2019-08-18 22:51:53 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-08-18 22:51:53 +0200 |
| commit | f72c2cf29d36ae836c894bad29dfd965d1af0236 (patch) | |
| tree | 48ad8b3bf6b60b91118b5573ebcf9ea783285dfb /tex/context/base/mkiv/back-exp.lua | |
| parent | 91b59bb4f8b33701c69e095841fe4cf57971ac20 (diff) | |
| download | context-f72c2cf29d36ae836c894bad29dfd965d1af0236.tar.gz | |
2019-08-18 22:26:00
Diffstat (limited to 'tex/context/base/mkiv/back-exp.lua')
| -rw-r--r-- | tex/context/base/mkiv/back-exp.lua | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tex/context/base/mkiv/back-exp.lua b/tex/context/base/mkiv/back-exp.lua index b7d5f6b2c..18333ab21 100644 --- a/tex/context/base/mkiv/back-exp.lua +++ b/tex/context/base/mkiv/back-exp.lua @@ -34,7 +34,7 @@ if not modules then modules = { } end modules ['back-exp'] = { -- check setting __i__ local next, type, tonumber = next, type, tonumber -local sub, gsub = string.sub, string.gsub +local sub, gsub, match = string.sub, string.gsub, string.match local validstring = string.valid local lpegmatch = lpeg.match local utfchar, utfvalues, utflen = utf.char, utf.values, utf.len @@ -2734,9 +2734,9 @@ local function pop() currentdepth = currentdepth - 1 if trace_export then if top then - report_export("%w</%s>",currentdepth,tree.tg) + report_export("%w</%s>",currentdepth,match(top,"[^>]+")) else - report_export("</%s>",tree.tg) + report_export("</BAD>") end end else |