diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-05-12 19:57:39 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-05-12 19:57:39 +0200 |
commit | 5f6a7c6790baa7e524de5b5bf71a29ea757378f6 (patch) | |
tree | d26bcd9e722c4f2c1dfe8f375669d5c0b3fc4972 /tex/context/base/mkiv/page-pcl.mkiv | |
parent | c49d2942bae7074f3bd4c04b6ee895cee1697ca3 (diff) | |
download | context-5f6a7c6790baa7e524de5b5bf71a29ea757378f6.tar.gz |
2019-05-12 19:16:00
Diffstat (limited to 'tex/context/base/mkiv/page-pcl.mkiv')
-rw-r--r-- | tex/context/base/mkiv/page-pcl.mkiv | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/page-pcl.mkiv b/tex/context/base/mkiv/page-pcl.mkiv index 140444fc2..9772320e7 100644 --- a/tex/context/base/mkiv/page-pcl.mkiv +++ b/tex/context/base/mkiv/page-pcl.mkiv @@ -112,13 +112,19 @@ %D \unknown +\def\page_col_registered_text_area_b#1% + {\begingroup + \makeupwidth\d_page_col_column_width + \page_one_registered_text_area_b{#1}% + \endgroup} + \unexpanded\def\page_col_command_package_contents#1#2% \box<n> \unvbox<n> % this one will be redone (checked) {\bgroup \setbox\b_page_one_contents\vbox to \textheight {\page_one_registered_text_area_a#1#2}% \page_one_command_package_show_state \ht\b_page_one_contents\textheight - \page_one_registered_text_area_b + \page_col_registered_text_area_b {\box\b_page_one_contents}% \egroup} @@ -174,13 +180,13 @@ \ht\b_page_one_bottom_notes\zeropoint \wd\b_page_one_bottom_notes\zeropoint \wd\b_page_one_bottom_notes\d_page_col_column_width - \page_one_registered_text_area_b + \page_col_registered_text_area_b {\vpack to \textheight - {\hbox{\box\b_page_one_contents\box\b_page_one_bottom_notes}}}% + {\hpack{\box\b_page_one_contents\box\b_page_one_bottom_notes}}}% \else \ht\b_page_one_contents\textheight \wd\b_page_one_contents\d_page_col_column_width - \page_one_registered_text_area_b + \page_col_registered_text_area_b {\box\b_page_one_contents}% \fi \egroup} |