Ok, I’ve found a way, see below.
But maybe someone has some nice lua (or other) tricks to share… (I’m not sure accessing t.dt[1] is particularly safe when operating on nested structures.)
Best,
Denis
\startbuffer[test]
<?xml version="1.0" encoding="UTF-8"?>
<doc>
<chapter>
<title>A short title</title>
<p>asdf asdf asdf jklö jklö jklö</p>
</chapter>
<chapter>
<title>A longer title bla bla bla bla bla bla bla bla</title>
<p>
asdf asdf asdf jklö jklö jklö
</p>
</chapter>
</doc>
\stopbuffer
\startxmlsetups xml:test
\xmlsetsetup{#1}{*}{-}
\xmlsetsetup{#1}{doc|chapter|p}{xml:*}
\stopxmlsetups
\xmlregisterdocumentsetup{test}{xml:test}
\startxmlsetups xml:doc
\xmlflush{#1}
\stopxmlsetups
\setuphead[chapter][expansion=yes] % make sure the stuff gets expanded on time
\startxmlsetups xml:chapter
\startchapter
[
title={\xmlfilter{#1}{/title/command(xml:chapter:title)}},
marking={\xmlfilter{#1}{/title/command(xml:chapter:title:marking)}},
]
\xmlflush{#1}
\stopchapter
\stopxmlsetups
\startxmlsetups xml:p
\xmlflush{#1}\par
\stopxmlsetups
\startluacode
function xml.functions.getMarking(t)
_,n = t.dt[1]:gsub("%S+","")
if n > 10 then
local words = {}
for word in t.dt[1]:gmatch("%S+") do table.insert(words, word) end
local resWords = {}
resWords = { unpack( words, 1, 7 ) }
res = table.concat(resWords, " ") .. " …"
else
res = t.dt[1]
end
context(res)
end
\stopluacode
\startxmlsetups xml:chapter:title:marking
\xmlfunction{#1}{getMarking}
\stopxmlsetups
\startxmlsetups xml:chapter:title
\xmlflush{#1}
\stopxmlsetups
\setupheadertexts[chapter]
\starttext
\xmlprocessbuffer{test}{test}{}
\stoptext
Von: denis.maier@unibe.ch <denis.maier@unibe.ch>
Gesendet: Montag, 11. September 2023 16:47
An: ntg-context@ntg.nl
Betreff: [NTG-context] XML: flush to lua function
Hi,
I have the following xml setup with a lua function:
\startluacode
function markingLength(s)
_,n = s:gsub("%S+","")
if n > 3 then
context("yes" .. " …") else context("no") end
end
\stopluacode
\startxmlsetups xml:ink:ink-title:marking
%\ctxlua{markingLength(\xmlflush{#1})} % does not work
\ctxlua{markingLength{"1 2 3 4"}}
\stopxmlsetups
While the function works, I cannot use xmlflush here. How can I properly pass the xml content to the lua function?
Best,
Denis