diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-11-12 19:54:50 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-11-12 19:54:50 +0100 |
commit | 0c75a2acf592eb4360685375904440f5e6b8125a (patch) | |
tree | 0a23a35bf947d13b3975bacdc27ad1d7edc9454c /tex/context/base/mkiv/page-imp.mkiv | |
parent | 5c195236a1a69b23762df71a791e6b4e2c671892 (diff) | |
download | context-0c75a2acf592eb4360685375904440f5e6b8125a.tar.gz |
2019-11-12 18:53:00
Diffstat (limited to 'tex/context/base/mkiv/page-imp.mkiv')
-rw-r--r-- | tex/context/base/mkiv/page-imp.mkiv | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/tex/context/base/mkiv/page-imp.mkiv b/tex/context/base/mkiv/page-imp.mkiv index b65f8991a..a7ef6ca38 100644 --- a/tex/context/base/mkiv/page-imp.mkiv +++ b/tex/context/base/mkiv/page-imp.mkiv @@ -210,6 +210,10 @@ \page_shipouts_ignore{#1}% \fi} +\newconditional\c_page_shipouts_use_objects \settrue\c_page_shipouts_use_objects + +\installcorenamespace {arrangedpage} + \def\page_shipouts_arrange#1% {\begingroup \setbox\shipoutscratchbox\hpack @@ -218,6 +222,12 @@ {\page_otr_flush_every_stuff \page_otr_flush_special_content \box\shipoutscratchbox}% + % + \ifconditional\c_page_shipouts_use_objects + \setobject\??arrangedpage{\the\realpageno}\hpack{\box\shipoutscratchbox}% + \setbox\shipoutscratchbox\hpack{\getobject\??arrangedpage{\the\realpageno}}% + \fi + % \pusharrangedpage\shipoutscratchbox \deadcycles\zerocount \endgroup} @@ -317,8 +327,10 @@ \fi \setuppapersize \ifarrangingpages - \clf_disablejobsave - %\disabledirective[job.save]% + \ifconditional\c_page_shipouts_use_objects\else + \clf_disablejobsave + %\disabledirective[job.save]% + \fi \fi \fi} @@ -421,6 +433,7 @@ \def\outputarrangedbox#1% {\begingroup \forgetall % somehow we're back and need to redo this + \dontcomplain \gotonextarrangepage \ifnum\arrangedrotationO\arrangedrotationE>\zerocount \setbox#1\vpack |