diff options
Diffstat (limited to 'tex/context/base/mkiv/typo-inj.mkiv')
-rw-r--r-- | tex/context/base/mkiv/typo-inj.mkiv | 30 |
1 files changed, 17 insertions, 13 deletions
diff --git a/tex/context/base/mkiv/typo-inj.mkiv b/tex/context/base/mkiv/typo-inj.mkiv index db5bb2d5b..633d430e4 100644 --- a/tex/context/base/mkiv/typo-inj.mkiv +++ b/tex/context/base/mkiv/typo-inj.mkiv @@ -44,31 +44,35 @@ %D \startsection[title=Delta] fourth \index{fourth} \stopsection %D \stoptext -\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\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\domarkinjector#1#2% called at the lua end +\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 {\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 -\permanent\protected\def\doinstallinjector#1% +\unexpanded\def\doinstallinjector#1% {\letvalue{typo_injectors_mark_#1}\donothing \letvalue{typo_injectors_check_#1}\donothing} -\permanent\protected\def\doactivateinjector#1% used at lua end +\unexpanded\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}}} -\permanent\protected\def\dotestinjector#1% only for testing outside unprotect +\unexpanded\def\dotestinjector#1% only for testing outside unprotect {\begincsname typo_injectors_check_#1\endcsname \begincsname typo_injectors_mark_#1\endcsname} |