diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-07-27 17:00:33 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-07-27 17:00:33 +0200 |
commit | 58f82fce8b1f0aa48e3c1acbeed15dee999f51b9 (patch) | |
tree | 23d4c91654c6cb88343d763d877dceaea2e6dd0a /tex/context/base/mkiv/page-ins.mkiv | |
parent | 07ac7b09a67d45e2dc971efc584f7f9ae7207669 (diff) | |
download | context-58f82fce8b1f0aa48e3c1acbeed15dee999f51b9.tar.gz |
2020-07-27 16:24:00
Diffstat (limited to 'tex/context/base/mkiv/page-ins.mkiv')
-rw-r--r-- | tex/context/base/mkiv/page-ins.mkiv | 43 |
1 files changed, 36 insertions, 7 deletions
diff --git a/tex/context/base/mkiv/page-ins.mkiv b/tex/context/base/mkiv/page-ins.mkiv index 3b473343a..bac31476c 100644 --- a/tex/context/base/mkiv/page-ins.mkiv +++ b/tex/context/base/mkiv/page-ins.mkiv @@ -38,6 +38,31 @@ %c!factor=\plusthousand, \c!location=\v!page] +\newconstant\insertionmigrationmode + +\def\page_inserts_check_anchoring + {\edef\p_anchoring{\namedinsertionparameter\empty\c!anchoring}% + \insertionmigrationmode\ifx\p_anchoring\v!auto\plusone\else\zerocount\fi + \clf_setinsertmigration{\p_anchoring}} + +\appendtoks + \ifx\currentinsertionparent\empty + \page_inserts_check_anchoring + \fi +\to \everysetupinsertion + +\ifcase\contextlmtxmode + \setupinsertion + [\c!anchoring=\v!none] +\else + \setupinsertion + [\c!anchoring=\v!auto] +\fi + +\appendtoks + \page_inserts_check_anchoring +\to \everystarttext % or \everyjob + \newcount\currentinsertionnumber % This is a count and not a macro ! \newtoks\t_page_inserts_list @@ -63,7 +88,9 @@ % \floatingpenalty\zerocount \appendtoks - \page_inserts_synchronize_registers + \ifx\currentinsertionparent\empty \else + \page_inserts_synchronize_registers + \fi \to \everysetupinsertion \unexpanded\def\page_inserts_process#1% beware, this adapts currentinsertion ! @@ -131,12 +158,14 @@ \to \everydefineinsertion \appendtoks - \clf_setupinsertion - {\currentinsertion} - {% - location {\insertionparameter\c!location}% - }% - \relax + \ifx\currentinsertionparent\empty \else + \clf_setupinsertion + {\currentinsertion} + {% + location {\insertionparameter\c!location}% + }% + \relax + \fi \to \everysetupinsertion \unexpanded\def\page_inserts_set_location#1#2% fast one |