diff options
| author | Hans Hagen <pragma@wxs.nl> | 2020-11-16 20:16:53 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-11-16 20:16:53 +0100 |
| commit | 744befce8596a7007e60c1f046da570fadc205bd (patch) | |
| tree | 867472bb4d18e581ef80ba0dbf8bf7fd047cddd2 /tex/context/base/mkiv/typo-inj.mkiv | |
| parent | a9eb7ca71c27fdd59cf99273adf74b17d72063b2 (diff) | |
| download | context-744befce8596a7007e60c1f046da570fadc205bd.tar.gz | |
2020-11-16 19:40:00
Diffstat (limited to 'tex/context/base/mkiv/typo-inj.mkiv')
| -rw-r--r-- | tex/context/base/mkiv/typo-inj.mkiv | 30 |
1 files changed, 13 insertions, 17 deletions
diff --git a/tex/context/base/mkiv/typo-inj.mkiv b/tex/context/base/mkiv/typo-inj.mkiv index 633d430e4..db5bb2d5b 100644 --- a/tex/context/base/mkiv/typo-inj.mkiv +++ b/tex/context/base/mkiv/typo-inj.mkiv @@ -44,35 +44,31 @@ %D \startsection[title=Delta] fourth \index{fourth} \stopsection %D \stoptext -\unexpanded\def\resetinjector [#1]{\clf_resetinjector{#1}} -\unexpanded\def\markinjector [#1]{\dontleavehmode\clf_markinjector{#1}} -\unexpanded\def\docheckinjector [#1][#2]{\clf_checkinjector{#1}{#2}} -\unexpanded\def\checknextinjector [#1]{\clf_checkinjector{#1}{\v!next}} -\unexpanded\def\checkpreviousinjector [#1]{\clf_checkinjector{#1}{\v!previous}} -%unexpanded\def\checknextinjector [#1]{\clf_checknextinjector{#1}} -%unexpanded\def\checkpreviousinjector [#1]{\clf_checkpreviousinjector{#1}} -\unexpanded\def\dosetinjector [#1][#2][#3]{\clf_setinjector{#1}{#2}{#3}} -\unexpanded\def\doshowinjector [#1]{\clf_showinjector{#1}} +\permanent \protected\def\resetinjector [#1]{\clf_resetinjector{#1}} +\permanent \protected\def\markinjector [#1]{\dontleavehmode\clf_markinjector{#1}} +\permanent\tolerant\protected\def\checkinjector [#1]#*[#2]{\clf_checkinjector{#1}{#2}} +\permanent \protected\def\checknextinjector [#1]{\clf_checkinjector{#1}{\v!next}} +\permanent \protected\def\checkpreviousinjector [#1]{\clf_checkinjector{#1}{\v!previous}} +%permanent \protected\def\checknextinjector [#1]{\clf_checknextinjector{#1}} +%permanent \protected\def\checkpreviousinjector [#1]{\clf_checkpreviousinjector{#1}} +\permanent\tolerant\protected\def\setinjector [#1]#*[#2]#*[#3]{\clf_setinjector{#1}{#2}{#3}} +\permanent\tolerant\protected\def\showinjector [#1]{\clf_showinjector{#1}} -\unexpanded\def\checkinjector{\dodoubleempty \docheckinjector} -\unexpanded\def\setinjector {\dotripleargument\dosetinjector} -\unexpanded\def\showinjector {\dosingleempty \doshowinjector} - -\unexpanded\def\domarkinjector#1#2% called at the lua end +\permanent\protected\def\domarkinjector#1#2% called at the lua end {\dontleavehmode\llap{\infofont\ifcase#1\else\red\fi<#2>\quad}} % low level definers .. we could have \injectors_mark and \injectors_check and then % use \v!list instead of \s!list -\unexpanded\def\doinstallinjector#1% +\permanent\protected\def\doinstallinjector#1% {\letvalue{typo_injectors_mark_#1}\donothing \letvalue{typo_injectors_check_#1}\donothing} -\unexpanded\def\doactivateinjector#1% used at lua end +\permanent\protected\def\doactivateinjector#1% used at lua end {\setuxvalue{typo_injectors_mark_#1}{\dontleavehmode\noexpand\clf_markinjector{#1}}% \setuxvalue{typo_injectors_check_#1}{\noexpand\clf_checkinjector{#1}}} -\unexpanded\def\dotestinjector#1% only for testing outside unprotect +\permanent\protected\def\dotestinjector#1% only for testing outside unprotect {\begincsname typo_injectors_check_#1\endcsname \begincsname typo_injectors_mark_#1\endcsname} |