1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24\input mtxcontextcommon.tex
25
26\starttext
27
28\startluacode
29 local report_setups = logs.reporter("setups")
30
31 context.starttext()
32
33 if document.arguments.list then
34 local okay = resolvers.findfile("context.mkiv") or ""
35 if okay ~= "" then
36 okay = file.collapsepath(okay,true)
37 okay = string.gsub(okay,"/base/","/interface/")
38 okay = string.gsub(okay,"/sources/","/interface/")
39 local path = file.pathpart(okay)
40 local pattern = file.join(path,"i-*.xml")
41 local files = dir.glob(pattern)
42 local valid = { }
43 table.sort(files)
44 for i=1,#files do
45 local name = file.nameonly(files[i])
46 local base = string.match(name,"^i%-([a-z]+)$")
47 if base then
48 valid[#valid+1] = base
49 end
50 end
51 if #valid > 0 then
52 report_setups("% t",valid)
53 end
54 context.bold("available setup groups: ")
55 context("%, t.",valid)
56 end
57 elseif document.arguments.overview then
58 if document.arguments.save then
59 context.enablemode { "setups:save" }
60 end
61 context.input("x-setups-overview.mkiv")
62 elseif #document.files > 0 then
63 context.usemodule { "x-setups-basics" }
64 for i=1,#document.files do
65 local filename = "i-" .. document.files[i]
66 report_setups("processing %a",filename)
67 context.loadsetups { filename }
68 end
69 context.input("x-setups-proofing.mkiv")
70 else
71 context("no setups")
72 end
73
74 context.stoptext()
75\stopluacode
76
77\stoptext
78
79 |