diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-04-08 15:36:51 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-04-08 15:36:51 +0200 |
commit | 9a1b9756939e12e328dea3633d9fe3cbde8f154b (patch) | |
tree | 22407c5d909d99866cb0cca7053288bd3d38d52b /tex/context/base/mkiv/cldf-ini.lua | |
parent | 8dcafbcc0fbdde27cf480584450516602daacd42 (diff) | |
download | context-9a1b9756939e12e328dea3633d9fe3cbde8f154b.tar.gz |
2020-04-08 14:37:00
Diffstat (limited to 'tex/context/base/mkiv/cldf-ini.lua')
-rw-r--r-- | tex/context/base/mkiv/cldf-ini.lua | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/tex/context/base/mkiv/cldf-ini.lua b/tex/context/base/mkiv/cldf-ini.lua index e22de5a5b..56cbfe3fa 100644 --- a/tex/context/base/mkiv/cldf-ini.lua +++ b/tex/context/base/mkiv/cldf-ini.lua @@ -917,7 +917,12 @@ local function writer(parent,command,...) -- already optimized before call flush(currentcatcodes,s_cldl_argument_b,storenode(ti),s_cldl_argument_e) end else - report_context("error: %a gets a weird argument %a",command,ti) + local s = tostring(ti) + if s then + flushdirect(currentcatcodes,s) + else + report_context("error: %a gets a weird argument %a",command,ti) + end end -- else -- local n = isnode(ti) @@ -1155,7 +1160,12 @@ local caller = function(parent,f,a,...) flush(currentcatcodes,s_cldl_option_s,storenode(f)," ") end else - report_context("error: %a gets a weird argument %a","context",f) + local s = tostring(f) + if s then + flushdirect(currentcatcodes,s) + else + report_context("error: %a gets a weird argument %a","context",f) + end end -- else -- local n = isnode(f) |