summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/page-imp.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkiv/page-imp.mkiv')
-rw-r--r--tex/context/base/mkiv/page-imp.mkiv17
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