diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-12-31 11:51:31 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-12-31 11:51:31 +0100 |
commit | 244d921e51a1cfdc57ebe313a2e561d579a78150 (patch) | |
tree | 323f203c4b691a434ae1b41a59c0acd5d73950be /tex/context/base/mkiv/pack-rul.mkiv | |
parent | 54732448eb933607bdcb11a457756741dc4e0b44 (diff) | |
download | context-244d921e51a1cfdc57ebe313a2e561d579a78150.tar.gz |
2019-12-31 11:38:00
Diffstat (limited to 'tex/context/base/mkiv/pack-rul.mkiv')
-rw-r--r-- | tex/context/base/mkiv/pack-rul.mkiv | 41 |
1 files changed, 28 insertions, 13 deletions
diff --git a/tex/context/base/mkiv/pack-rul.mkiv b/tex/context/base/mkiv/pack-rul.mkiv index 8732c7e6b..f44f547c0 100644 --- a/tex/context/base/mkiv/pack-rul.mkiv +++ b/tex/context/base/mkiv/pack-rul.mkiv @@ -468,25 +468,40 @@ {\def\pack_framed_define_overlay_indeed##1{\setvalue{\??overlay##1}{\executedefinedoverlay{##1}{#2}}}% \processcommalist[#1]\pack_framed_define_overlay_indeed} +% \unexpanded\def\executedefinedoverlay#1#2% we can share the definitions +% {\bgroup % redundant grouping +% \setbox\scratchbox\hbox\bgroup +% \ifzeropt\d_framed_target_dp +% \the\everyoverlay#2% saves wrapping (and lua call) +% \else +% \lower\d_framed_target_dp +% \hbox{\the\everyoverlay#2}% +% \fi +% \egroup +% \setlayoutcomponentattribute{\v!overlay:#1}% +% \setbox\scratchbox\hpack \layoutcomponentboxattribute +% {\kern -.5\dimexpr\wd\scratchbox-\d_framed_target_wd\relax % was \d_overlay_width +% \raise-.5\dimexpr\ht\scratchbox-\d_framed_target_ht\relax % not \d_overlay_height ! +% \box\scratchbox}% +% \wd\scratchbox\d_framed_target_wd +% \ht\scratchbox\d_framed_target_ht +% \dp\scratchbox\d_framed_target_dp +% \box\scratchbox +% \egroup} + +% 20191231: moved from cont-exp: + \unexpanded\def\executedefinedoverlay#1#2% we can share the definitions {\bgroup % redundant grouping - \setbox\scratchbox\hbox\bgroup - \ifzeropt\d_framed_target_dp - \the\everyoverlay#2% saves wrapping (and lua call) - \else - \lower\d_framed_target_dp - \hbox{\the\everyoverlay#2}% - \fi - \egroup \setlayoutcomponentattribute{\v!overlay:#1}% - \setbox\scratchbox\hpack \layoutcomponentboxattribute - {\kern -.5\dimexpr\wd\scratchbox-\d_framed_target_wd\relax % was \d_overlay_width - \raise-.5\dimexpr\ht\scratchbox-\d_framed_target_ht\relax % not \d_overlay_height ! - \box\scratchbox}% + \setbox\scratchbox\hbox{\the\everyoverlay#2}% + \hpack to \d_framed_target_wd \layoutcomponentboxattribute + {\hskip-.5\dimexpr\wd\scratchbox-\d_framed_target_wd\relax + \box\scratchbox + \hss}% \wd\scratchbox\d_framed_target_wd \ht\scratchbox\d_framed_target_ht \dp\scratchbox\d_framed_target_dp - \box\scratchbox \egroup} %D \macros |