summaryrefslogtreecommitdiff
path: root/tex/context/base/symb-ini.lua
blob: 6a4a18825292279baaccaf90fe7ce527082a7339 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
if not modules then modules = { } end modules ['symb-ini'] = {
    version   = 1.001,
    comment   = "companion to symb-ini.mkiv",
    author    = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
    copyright = "PRAGMA ADE / ConTeXt Development Team",
    license   = "see context related readme files"
}

local context        = context
local variables      = interfaces.variables

fonts                = fonts or { } -- brrrr

local symbols        = fonts.symbols or { }
fonts.symbols        = symbols

local listitem       = utilities.parsers.listitem
local uselibrary     = resolvers.uselibrary

local report_symbols = logs.reporter ("fonts","symbols")
local status_symbols = logs.messenger("fonts","symbols")

local patterns = {
    "symb-imp-%s.mkiv",
    "symb-imp-%s.tex",
    -- obsolete:
    "symb-%s.mkiv",
    "symb-%s.tex"
}

local function action(name,foundname)
    -- context.startnointerference()
    context.startreadingfile()
    context.input(foundname)
    status_symbols("library %a loaded",name)
    context.stopreadingfile()
    -- context.stopnointerference()
end

local function failure(name)
    report_symbols("library %a is unknown",name)
end

function symbols.uselibrary(name)
    if name ~= variables.reset then
        for name in listitem(name) do
            uselibrary {
                name     = name,
                patterns = patterns,
                action   = action,
                failure  = failure,
                onlyonce = true,
            }
        end
    end
end

interfaces.implement {
    name      = "usesymbols",
    actions   = symbols.uselibrary,
    arguments = "string",
}