diff options
| author | Hans Hagen <pragma@wxs.nl> | 2018-05-24 17:32:43 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2018-05-24 17:32:43 +0200 |
| commit | e52e58ff4a7007ca774905727391e5f78135f98d (patch) | |
| tree | 55357f7bcd2825670a21f79b7f3c3fa9a1404e8f /tex/context/base/mkiv/strc-tag.mkiv | |
| parent | 6a68bb9d4e7e8454b031143b9cd14edf3702a68d (diff) | |
| download | context-e52e58ff4a7007ca774905727391e5f78135f98d.tar.gz | |
2018-05-24 15:56:00
Diffstat (limited to 'tex/context/base/mkiv/strc-tag.mkiv')
| -rw-r--r-- | tex/context/base/mkiv/strc-tag.mkiv | 41 |
1 files changed, 33 insertions, 8 deletions
diff --git a/tex/context/base/mkiv/strc-tag.mkiv b/tex/context/base/mkiv/strc-tag.mkiv index 2ee71d67c..0f8b46df9 100644 --- a/tex/context/base/mkiv/strc-tag.mkiv +++ b/tex/context/base/mkiv/strc-tag.mkiv @@ -297,8 +297,13 @@ % {\let\dostarttagged\strc_tags_start_yes % \let\dostoptagged \strc_tags_stop_yes} +\newconditional\c_strc_tags_enabled + \unexpanded\def\strc_tags_enable - {\let\dostarttagged \strc_tags_enabled_start_detail + {% once enable one is toast + \global\settrue\c_strc_tags_enabled + % and gets: + \let\dostarttagged \strc_tags_enabled_start_detail \let\dostarttaggednodetail\strc_tags_enabled_start_no_detail \let\dostarttaggedchained \strc_tags_enabled_start_chained \let\dostoptagged \strc_tags_enabled_stop @@ -306,12 +311,21 @@ \let\dostopignoretagging \strc_tags_stop_yes_ignore} \unexpanded\def\strc_tags_disable - {\let\dostarttagged \strc_tags_start_nop_detail - \let\dostarttaggednodetail\strc_tags_start_nop_no_detail - \let\dostarttaggedchained \strc_tags_start_nop_chained - \let\dostoptagged \strc_tags_stop_nop - \let\dostartignoretagging \strc_tags_start_nop_ignore - \let\dostopignoretagging \strc_tags_stop_nop_ignore} + {\ifconditional\c_strc_tags_enabled + % so now all are artifacts + \let\dostarttagged \strc_tags_start_nop_ignore + \let\dostarttaggednodetail\strc_tags_start_nop_no_detail + \let\dostarttaggedchained \strc_tags_start_nop_chained + \let\dostoptagged \strc_tags_stop_nop_ignore + \else + % initial + \let\dostarttagged \strc_tags_start_nop_detail + \let\dostarttaggednodetail\strc_tags_start_nop_no_detail + \let\dostarttaggedchained \strc_tags_start_nop_chained + \let\dostoptagged \strc_tags_stop_nop + \let\dostartignoretagging \strc_tags_start_nop_ignore + \let\dostopignoretagging \strc_tags_stop_nop_ignore + \fi} % for luigi (beware: fully expandable): @@ -468,8 +482,19 @@ %D This will only work well with sane use. +% \appendtoks +% {% +% \doglobal\appendtoks +% \strc_tags_start_yes_ignore +% \to \everybeforepagebody +% \doglobal\appendtoks +% \strc_tags_stop_yes_ignore +% \to \everyafterpagebody +% }% +% \to \everyenableelements + \appendtoks - \dostartignoretagging + \dostartignoretagging \to \everybeforepagebody \appendtoks |