summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/page-sid.mkiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2018-07-27 19:41:15 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2018-07-27 19:41:15 +0200
commitb61d5dd3555e906b21601ff75b3268c0f359283e (patch)
treed46b07daf1c26c0fc7d7254d3f0e1515e9ed36a8 /tex/context/base/mkiv/page-sid.mkiv
parent1add40ac787d36d3bd40e196aea752dff2cfb769 (diff)
downloadcontext-b61d5dd3555e906b21601ff75b3268c0f359283e.tar.gz
2018-07-27 19:21:00
Diffstat (limited to 'tex/context/base/mkiv/page-sid.mkiv')
-rw-r--r--tex/context/base/mkiv/page-sid.mkiv17
1 files changed, 14 insertions, 3 deletions
diff --git a/tex/context/base/mkiv/page-sid.mkiv b/tex/context/base/mkiv/page-sid.mkiv
index e983455bc..9304af6d9 100644
--- a/tex/context/base/mkiv/page-sid.mkiv
+++ b/tex/context/base/mkiv/page-sid.mkiv
@@ -760,7 +760,8 @@
%\ignoreparskip}
\def\page_sides_handle_float#1% grid (4) is rather experimental
- {\page_sides_check_horizontal_skips
+ {\page_sides_initialize_checker
+ \page_sides_check_horizontal_skips
\page_sides_check_vertical_skips
\page_sides_apply_horizontal_shift
\page_sides_check_previous_float
@@ -803,7 +804,16 @@
\fi
\parskip\s_spac_whitespace_parskip} % not needed
-\let\page_sides_check_floats\page_sides_check_floats_indeed
+% \let\page_sides_check_floats\page_sides_check_floats_indeed
+
+\let\page_sides_check_floats\relax
+
+\def\page_sides_initialize_checker
+ {\ifx\page_sides_check_floats\relax
+ \glet\page_sides_check_floats\page_sides_check_floats_indeed
+ \clf_enablesidefloatchecker
+ \glet\page_sides_initialize_checker\relax
+ \fi}
\unexpanded\def\page_sides_check_floats_tracer
{\begingroup
@@ -913,7 +923,8 @@
\global\c_page_sides_hangafter\zerocount
\hangindent\zeropoint
\fi
- \global\c_page_sides_checks_done\zerocount
+ % \global % no, otherwise a next hangindent won't work
+ \c_page_sides_checks_done\zerocount
\fi}
\unexpanded\def\page_sides_synchronize_floats