diff options
Diffstat (limited to 'tex/context/base/xtag-pre.mkii')
| -rw-r--r-- | tex/context/base/xtag-pre.mkii | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tex/context/base/xtag-pre.mkii b/tex/context/base/xtag-pre.mkii index 63706d64c..5e75197b7 100644 --- a/tex/context/base/xtag-pre.mkii +++ b/tex/context/base/xtag-pre.mkii @@ -18,6 +18,19 @@ \unprotect +%D For \MKIV: + +\setvalue{@u@s@"}#1#2"{#2} \setvalue{@g@s@"}#1#2"{\scratchtoks{#2}} +\setvalue{@u@s@'}#1#2'{#2} \setvalue{@g@s@'}#1#2'{\scratchtoks{#2}} +\setvalue{@u@s@ }#1#2 {#2} \setvalue{@g@s@ }#1#2 {\scratchtoks{#2}} + +\def\unstringed#1{\csname\ifcsname @u@s@#1\endcsname @u@s@#1\else\s!empty\fi\endcsname#1} +\def\grabstring#1{\csname\ifcsname @g@s@#1\endcsname @g@s@#1\else\s!empty\fi\endcsname#1} + +\def\dowithgrabbedstring#1% + {\def\@@dowithgrabbedstring{#1}% + \afterassignment\@@dowithgrabbedstring\grabstring} + %D Let's get rid of ligatures: % \definefonthandling [default] [noligs] |