summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/page-spr.mkiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2019-01-03 20:16:56 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2019-01-03 20:16:56 +0100
commitb04dda4c73d0f71e78f1fd4979ef04c7e9a669ed (patch)
tree4a53c427af3bca27aa5dc47f4c06ee71fb2e8508 /tex/context/base/mkiv/page-spr.mkiv
parentb28de538b3b4dc7acda5eb9eefc7a7d68c8fb49f (diff)
downloadcontext-b04dda4c73d0f71e78f1fd4979ef04c7e9a669ed.tar.gz
2019-01-03 19:35:00
Diffstat (limited to 'tex/context/base/mkiv/page-spr.mkiv')
-rw-r--r--tex/context/base/mkiv/page-spr.mkiv23
1 files changed, 20 insertions, 3 deletions
diff --git a/tex/context/base/mkiv/page-spr.mkiv b/tex/context/base/mkiv/page-spr.mkiv
index 6c8f4d187..bb95ee467 100644
--- a/tex/context/base/mkiv/page-spr.mkiv
+++ b/tex/context/base/mkiv/page-spr.mkiv
@@ -23,15 +23,32 @@
% beware, ugly overload, to be redone
+% \def\normalsettextpagecontent#1#2#3% #2 and #3 will disappear
+% {\setbox#1\hbox
+% {\setlayoutcomponentattribute{\v!page:\v!text}%
+% \vbox \layoutcomponentboxattribute to \textheight
+% {\offinterlineskip
+% \freezetextwidth
+% \hsize\textwidth % local variant of \sethsize
+% \boxmaxdepth\maxdepth
+% \noindent % content can be < \hsize
+% \page_otr_command_package_contents#2#3}}%
+% \dp#1\zeropoint
+% \ifconditional\c_page_spread_busy
+% \normalsettextpagecontent_spread{#1}%
+% \else
+% \normalsettextpagecontent_normal{#1}%
+% \fi}
+
\def\normalsettextpagecontent#1#2#3% #2 and #3 will disappear
- {\setbox#1\hbox
+ {\setbox#1\hpack
{\setlayoutcomponentattribute{\v!page:\v!text}%
- \vbox \layoutcomponentboxattribute to \textheight
+ \vpack \layoutcomponentboxattribute to \textheight
{\offinterlineskip
\freezetextwidth
\hsize\textwidth % local variant of \sethsize
\boxmaxdepth\maxdepth
- \noindent % content can be < \hsize
+ \noindent % content can be < \hsize
\page_otr_command_package_contents#2#3}}%
\dp#1\zeropoint
\ifconditional\c_page_spread_busy