diff options
author | Hans Hagen <pragma@wxs.nl> | 2022-04-19 20:58:40 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2022-04-19 20:58:40 +0200 |
commit | b9a7e870cf47674c90331b41f9267768992b49cb (patch) | |
tree | 7b7bb2ee92af1767712ffcfbec47995c8894e214 /tex/context/base/mkiv/publ-ini.lua | |
parent | b155eafa1e2d73692eed08ecabeb5ad589ac11dc (diff) | |
download | context-b9a7e870cf47674c90331b41f9267768992b49cb.tar.gz |
2022-04-19 19:52:00
Diffstat (limited to 'tex/context/base/mkiv/publ-ini.lua')
-rw-r--r-- | tex/context/base/mkiv/publ-ini.lua | 21 |
1 files changed, 20 insertions, 1 deletions
diff --git a/tex/context/base/mkiv/publ-ini.lua b/tex/context/base/mkiv/publ-ini.lua index 9d43f69f4..d6a7bf3de 100644 --- a/tex/context/base/mkiv/publ-ini.lua +++ b/tex/context/base/mkiv/publ-ini.lua @@ -22,7 +22,7 @@ if not modules then modules = { } end modules ['publ-ini'] = { -- gain is not that large anyway because not much publication stuff is flushed. local next, rawget, type, tostring, tonumber = next, rawget, type, tostring, tonumber -local match, find, gsub = string.match, string.find, string.gsub +local match, find, gsub, lower = string.match, string.find, string.gsub, string.lower local concat, sort, tohash = table.concat, table.sort, table.tohash local mod = math.mod local formatters = string.formatters @@ -1316,6 +1316,12 @@ do local typesetters = { } publications.typesetters = typesetters + local lowered = setmetatableindex(function(t,k) + k = lower(k) + t[k] = k + return k + end) + local function defaulttypesetter(field,value,manipulator) if value and value ~= "" then value = tostring(value) @@ -1422,6 +1428,8 @@ do local function get(dataset,tag,field,what,check,catspec) -- somewhat more extensive local current = rawget(datasets,dataset) if current then + tag = lowered.tag + field = lowered.field local data = current.luadata[tag] if data then local category = data.category @@ -1471,6 +1479,8 @@ do local function btxflush(name,tag,field) local dataset = rawget(datasets,name) if dataset then + tag = lowered.tag + field = lowered.field local fields = dataset.luadata[tag] if fields then local manipulator, field = splitmanipulation(field) @@ -1497,6 +1507,8 @@ do local function btxfield(name,tag,field) local dataset = rawget(datasets,name) if dataset then + tag = lowered.tag + field = lowered.field local fields = dataset.luadata[tag] if fields then local category = fields.category @@ -1522,6 +1534,8 @@ do local function btxdetail(name,tag,field) local dataset = rawget(datasets,name) if dataset then + tag = lowered.tag + field = lowered.field local fields = dataset.luadata[tag] if fields then local details = dataset.details[tag] @@ -1552,8 +1566,11 @@ do local function btxdirect(name,tag,field) local dataset = rawget(datasets,name) if dataset then + tag = lowered.tag + field = lowered.field local fields = dataset.luadata[tag] if fields then + field = lowered.field local manipulator, field = splitmanipulation(field) local value = fields[field] if value then @@ -1572,6 +1589,8 @@ do local function okay(name,tag,field) local dataset = rawget(datasets,name) if dataset then + tag = lowered.tag + field = lowered.field local fields = dataset.luadata[tag] if fields then local category = fields.category |