diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/lxml-ctx.mkiv')
-rw-r--r-- | Master/texmf-dist/tex/context/base/lxml-ctx.mkiv | 69 |
1 files changed, 33 insertions, 36 deletions
diff --git a/Master/texmf-dist/tex/context/base/lxml-ctx.mkiv b/Master/texmf-dist/tex/context/base/lxml-ctx.mkiv index 73d082d0d51..530c29aa778 100644 --- a/Master/texmf-dist/tex/context/base/lxml-ctx.mkiv +++ b/Master/texmf-dist/tex/context/base/lxml-ctx.mkiv @@ -5,7 +5,7 @@ %D subtitle=Initialization, %D author=Hans Hagen, %D date=\currentdate, -%D copyright={PRAGMA / Hans Hagen \& Ton Otten}] +%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] %C %C This module is part of the \CONTEXT\ macro||package and is %C therefore copyrighted by \PRAGMA. See mreadme.pdf for @@ -20,45 +20,42 @@ \unprotect -% the letterbar is a messy hack and is needed for the tabulate +% The \let|=letterbar is a messy hack and is needed for the tabulate. We now use +% \detokenize. \settrue \xmllshowbuffer \setfalse\xmllshowtitle \settrue \xmllshowwarning -\definehead[lshowtitle][subsubsubsubsubject] -\setuphead[lshowtitle][style=\tta] - -% \unexpanded\def\setuplxmlshow[#1]% -% {\dodoubleargument\getparameters[\??xl]} - -\def\xmllshow#1% - {\begingroup - \let|=\letterbar - \ctxlua{xml.ctx.tshow { - pattern = \!!bs#1\!!es, - \ifconditional\xmllshowtitle - title = "lshowtitle", - \fi - \ifconditional\xmllshowwarning - warning = true, - \fi - } }% - \endgroup} - -\def\xmllshowbuffer#1#2#3% - {\begingroup - \let|=\letterbar - \ctxlua{xml.ctx.tshow { - pattern = \!!bs#2\!!es, - \ifconditional\xmllshowbuffer - xmlroot = "#1", - attribute = "#3", - \fi - \ifconditional\xmllshowwarning - warning = true, - \fi - } }% - \endgroup} +\definehead + [lshowtitle] + [subsubsubsubsubject] + +\setuphead + [lshowtitle] + [\c!style=\tta] + +\unexpanded\def\xmllshow#1% + {\ctxlua{xml.ctx.tshow { + pattern = \!!bs\detokenize{#1}\!!es, + \ifconditional\xmllshowtitle + title = "lshowtitle", + \fi + \ifconditional\xmllshowwarning + warning = true, + \fi + } }} + +\unexpanded\def\xmllshowbuffer#1#2#3% + {\ctxlua{xml.ctx.tshow { + pattern = \!!bs\detokenize{#2}\!!es, + \ifconditional\xmllshowbuffer + xmlroot = "#1", + attribute = "#3", + \fi + \ifconditional\xmllshowwarning + warning = true, + \fi + } }} \protect |