From 7eb8593f39b61673c90d12c2fc590933cedf3db0 Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Wed, 27 Aug 2014 12:34:00 +0200 Subject: beta 2014.08.27 12:34 --- tex/context/base/strc-tag.mkiv | 18 +++++++++++++++--- 1 file changed, 15 insertions(+), 3 deletions(-) (limited to 'tex/context/base/strc-tag.mkiv') diff --git a/tex/context/base/strc-tag.mkiv b/tex/context/base/strc-tag.mkiv index 83eb3c142..a1cdac592 100644 --- a/tex/context/base/strc-tag.mkiv +++ b/tex/context/base/strc-tag.mkiv @@ -374,12 +374,24 @@ \let\startpar\startparagraph \let\stoppar \stopparagraph +\def\strc_tags_document_start_indeed + {\glet\strc_tags_document_start_indeed\relax + \dostarttagged\t!document\empty} + +\def\strc_tags_document_stop_indeed + {\glet\strc_tags_document_stop_indeed\relax + \dostoptagged} + \appendtoks - \dostarttagged\t!document\empty -\to \everystarttext + \strc_tags_document_start_indeed % here because otherwise products don't get a root (starttext before env) +\to \everyenableelements + +% \appendtoks +% \strc_tags_document_start_indeed +% \to \everystarttext \appendtoks - \dostoptagged + \strc_tags_document_stop_indeed \to \everystoptext \appendtoks -- cgit v1.2.3