diff options
author | Hans Hagen <pragma@wxs.nl> | 2017-11-14 14:35:42 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2017-11-14 14:35:42 +0100 |
commit | 6f55552ca1456f0a2d50d1d0fdc8dc813d9ace77 (patch) | |
tree | 4be2ae8eabfd71f42977c74055b2f15d4f253d7b /tex/context/base/mkiv/page-flt.mkiv | |
parent | 3c5bdb02c68293a907c765f109641c3939c13f6c (diff) | |
download | context-6f55552ca1456f0a2d50d1d0fdc8dc813d9ace77.tar.gz |
2017-11-14 13:58:00
Diffstat (limited to 'tex/context/base/mkiv/page-flt.mkiv')
-rw-r--r-- | tex/context/base/mkiv/page-flt.mkiv | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/tex/context/base/mkiv/page-flt.mkiv b/tex/context/base/mkiv/page-flt.mkiv index c43fb3c69..555077ace 100644 --- a/tex/context/base/mkiv/page-flt.mkiv +++ b/tex/context/base/mkiv/page-flt.mkiv @@ -22,14 +22,18 @@ \ifdefined\s!topfloat \else \def\s!topfloat {topfloat} \fi \ifdefined\s!bottomfloat \else \def\s!bottomfloat{bottomfloat} \fi +\ifdefined\s!pagefloat \else \def\s!pagefloat {pagefloat} \fi \defineinsertion[\s!topfloat] \defineinsertion[\s!bottomfloat] +\defineinsertion[\s!pagefloat] \newdimen \d_page_floats_inserted_bottom \newdimen \d_page_floats_inserted_top +\newdimen \d_page_floats_inserted_page \newcount \c_page_floats_n_of_top \c_page_floats_n_of_top \plustwo \newcount \c_page_floats_n_of_bottom \c_page_floats_n_of_bottom\zerocount +\newcount \c_page_floats_n_of_page \c_page_floats_n_of_page \plustwo \newconstant\c_page_floats_insertions_topskip_mode % 1 = no topskip @@ -189,12 +193,14 @@ %D %D First we reimplement some helpers. +\def\page_floats_get_used_hsize{\hsize} + \unexpanded\def\page_floats_get {\ifconditional\c_page_floats_some_waiting \page_floats_flush\s!text\plusone \ifconditional\c_page_floats_center_box - \ifdim\wd\globalscratchbox<\hsize - \global\setbox\floatbox\hpack to \hsize{\hss\box\floatbox\hss}% + \ifdim\wd\globalscratchbox<\page_floats_get_used_hsize + \global\setbox\floatbox\hpack to \page_floats_get_used_hsize{\hss\box\floatbox\hss}% \else % retain special alignments \ifinsidecolumns |