684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
...
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
|
local function getSpanRenderers(procs)
local tag, elt, catenate = procs.tag, procs.elt, procs.catenate
local span_renderers = {}
local plainrdr = getBaseRenderers(tagproc.toTXT, span_renderers)
local htmlSpan = getBaseRenderers(procs, span_renderers).htmlSpan
function span_renderers.format(sp,...)
local tags = { strong = 'strong', emph = 'em', strike = 'del', insert = 'ins', literal = 'code', variable = 'var'}
if sp.style == 'literal' and not opts['fossil-uv'] then
addStyle 'code'
elseif sp.style == 'strike' or sp.style == 'insert' then
addStyle 'editors_markup'
elseif sp.style == 'variable' then
addStyle 'var'
end
................................................................................
ct.parse_span(m.macro, b.origin), b,s)
local r = b.origin:ref(macroname)
if type(r) ~= 'string' then
b.origin:fail('%s is an object, not a reference', r.id)
end
local mctx = b.origin:clone()
mctx.invocation = m
return htmlSpan(ct.parse_span(r, mctx),b,s)
end
function span_renderers.math(m,b,s)
addStyle 'math'
local spans = {}
local function fmt(sp, target)
for i,v in ipairs(sp) do
if type(v) == 'string' then
|
|
>
>
>
>
>
>
>
>
>
>
|
>
>
>
>
>
>
>
>
|
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
...
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
|
local function getSpanRenderers(procs)
local tag, elt, catenate = procs.tag, procs.elt, procs.catenate
local span_renderers = {}
local plainrdr = getBaseRenderers(tagproc.toTXT, span_renderers)
local htmlSpan = getBaseRenderers(procs, span_renderers).htmlSpan
function span_renderers.format(sp,...)
local tags = {
strong = 'strong';
emph = 'em';
strike = 'del';
insert = 'ins';
literal = 'code';
variable = 'var';
super = 'sup';
sub = 'sub';
underline = 'u';
}
if sp.style == 'literal' and not opts['fossil-uv'] then
addStyle 'code'
elseif sp.style == 'strike' or sp.style == 'insert' then
addStyle 'editors_markup'
elseif sp.style == 'variable' then
addStyle 'var'
end
................................................................................
ct.parse_span(m.macro, b.origin), b,s)
local r = b.origin:ref(macroname)
if type(r) ~= 'string' then
b.origin:fail('%s is an object, not a reference', r.id)
end
local mctx = b.origin:clone()
mctx.invocation = m
local ir = ct.parse_span(r, mctx)
-- even though this happens at render time, it really shouldn't;
-- we pretend this is happening as part of the document job
local j = b.origin.doc.docjob
for fn, ext, state in j:each('hook', 'doc_macro_expand_span') do
local r = fn(j:delegate(ext), ir, b)
if r then ir = r end
end
return htmlSpan(ir, b, s)
end
function span_renderers.math(m,b,s)
addStyle 'math'
local spans = {}
local function fmt(sp, target)
for i,v in ipairs(sp) do
if type(v) == 'string' then
|