diff options
| author | Hans Hagen <pragma@wxs.nl> | 2008-01-26 02:30:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2008-01-26 02:30:00 +0100 |
| commit | e3467ba8810e788b01d8e7ce2e16d3c8ffdd3e2a (patch) | |
| tree | 151358a831d39525db303351ed5bece56b2a7524 /tex/context/base/xtag-ini.tex | |
| parent | 000a8c62f8ab88f17964644ce3dd3fc2720fb345 (diff) | |
| download | context-e3467ba8810e788b01d8e7ce2e16d3c8ffdd3e2a.tar.gz | |
stable 2008.01.26 02:30
Diffstat (limited to 'tex/context/base/xtag-ini.tex')
| -rw-r--r-- | tex/context/base/xtag-ini.tex | 24 |
1 files changed, 17 insertions, 7 deletions
diff --git a/tex/context/base/xtag-ini.tex b/tex/context/base/xtag-ini.tex index 155034145..48fcb4c80 100644 --- a/tex/context/base/xtag-ini.tex +++ b/tex/context/base/xtag-ini.tex @@ -631,7 +631,7 @@ \def\parseXMLprocess#1#2% {\cleanupXMLprocess{#2}% - \convertcommand#1\to\ascii + \defconvertedcommand\ascii{#1}% %\writestatus{xml-process}{\ascii} \expanded {\executeifdefined @@ -2308,7 +2308,7 @@ \chardef\utfunicodetracer7% new \xdef\@@XML@@string{\csname\@@XMLdata:#2\endcsname}% \egroup - \convertcommand\@@XML@@string\to#1} + \defconvertedcommand#1\@@XML@@string} % this has to expand nicely: % @@ -2325,7 +2325,7 @@ \let\getXMLentity\expandedXMLentity % should this go in \simplify ? \xdef\@@XML@@string{\csname\@@XMLdata:#2\endcsname}% \egroup - \convertcommand\@@XML@@string\to#1} + \defconvertedcommand#1\@@XML@@string} \def\defXMLpar#1#2#3% to be documented {\@EA\def\@EA#1\csname\ifcsname\@@XMLvariable:#2:#3\endcsname\@@XMLvariable:#2:#3\else\s!empty\fi\endcsname} @@ -2578,9 +2578,9 @@ \def\XMLtyp#1#2#3% {\ifcsname\@@XMLvariable:#1:#2\endcsname - \@EA\convertcommand\csname\@@XMLvariable:#1:#2\endcsname\to\ascii + \@EA\defconvertedcommand\@EA\ascii\csname\@@XMLvariable:#1:#2\endcsname \else - \convertargument#3\to\ascii + \defconvertedargument\ascii{#3}% \fi \ascii} @@ -2660,9 +2660,9 @@ \def\defXMLattributestring#1#2#3#4% {\ifcsname\@@XMLvariable:#2:#3\endcsname - \@EA\convertcommand\csname\@@XMLvariable:#2:#3\endcsname\to#1% + \@EA\defconvertedcommand\@EA#1\csname\@@XMLvariable:#2:#3\endcsname \else - \convertargument#4\to#1% + \defconvertedargument#1{#4}% \fi} \def\XMLprocess#1% @@ -2983,4 +2983,14 @@ \egroup +\def\defXMLexpanded#1#2% + {\begingroup + \let\getXMLentity\expandedXMLentity + \expanded{\endgroup\edef\noexpand#1{#2}}} + +\def\gdefXMLexpanded#1#2% + {\begingroup + \let\getXMLentity\expandedXMLentity + \expanded{\endgroup\xdef\noexpand#1{#2}}} + \protect \endinput |