diff options
author | Hans Hagen <pragma@wxs.nl> | 2021-02-12 18:57:41 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-02-12 18:57:41 +0100 |
commit | 79bdc958cec8c084f8c8472e8f600c60969b03fa (patch) | |
tree | 97e489a6c23b01dae519aa36a535d62c301fabee /tex/context/base/mkxl/pack-fen.mkxl | |
parent | 45e121c1d9414786e677d931101af1357294e9b7 (diff) | |
download | context-79bdc958cec8c084f8c8472e8f600c60969b03fa.tar.gz |
2021-02-12 18:48:00
Diffstat (limited to 'tex/context/base/mkxl/pack-fen.mkxl')
-rw-r--r-- | tex/context/base/mkxl/pack-fen.mkxl | 40 |
1 files changed, 12 insertions, 28 deletions
diff --git a/tex/context/base/mkxl/pack-fen.mkxl b/tex/context/base/mkxl/pack-fen.mkxl index 8fa74b884..fc9817f92 100644 --- a/tex/context/base/mkxl/pack-fen.mkxl +++ b/tex/context/base/mkxl/pack-fen.mkxl @@ -28,57 +28,41 @@ \unprotect \permanent\protected\def\installleftframerenderer#1#2% - {\setvalue{\??framedleft\v!on#1}{\whateverleftframe{#2}}% + {\defcsname\??framedleft\v!on#1\endcsname{\whateverleftframe{#2}}% \letcsname\??framedleft\v!off#1\expandafter\endcsname\csname\??framedleft\v!on#1\endcsname} \permanent\protected\def\installrightframerenderer#1#2% - {\setvalue{\??framedright\v!on#1}{\whateverrightframe{#2}}% + {\defcsname\??framedright\v!on#1\endcsname{\whateverrightframe{#2}}% \letcsname\??framedright\v!off#1\expandafter\endcsname\csname\??framedright\v!on#1\endcsname} \permanent\protected\def\installtopframerenderer#1#2% - {\setvalue{\??framedtop\v!on#1}{\whatevertopframe{#2}}% + {\defcsname\??framedtop\v!on#1\endcsname{\whatevertopframe{#2}}% \letcsname\??framedtop\v!off#1\expandafter\endcsname\csname\??framedtop\v!on#1\endcsname} \permanent\protected\def\installbottomframerenderer#1#2% - {\setvalue{\??framedbottom\v!on#1}{\whateverbottomframe{#2}}% + {\defcsname\??framedbottom\v!on#1\endcsname{\whateverbottomframe{#2}}% \letcsname\??framedbottom\v!off#1\expandafter\endcsname\csname\??framedbottom\v!on#1\endcsname} -\ifdefined \pack_framed_overlay_initialize_indeed - - \aliased\let\setinstalledframedimensions\pack_framed_overlay_initialize_indeed - -\else - - \permanent\protected\def\setinstalledframedimensions - {\d_overlay_width \frameddimenwd - \d_overlay_height \dimexpr\frameddimenht+\frameddimendp\relax - \d_overlay_depth \frameddimendp - \d_overlay_linewidth \ruledlinewidth - \edef\overlaycolor {\framedparameter\c!backgroundcolor}% - \edef\overlaylinecolor{\framedparameter\c!framecolor}} - -\fi - \newbox\b_framed_rendered -\permanent\def\whateverleftframe#1% - {\setinstalledframedimensions +\permanent\protected\def\whateverleftframe#1% + {\pack_framed_overlay_initialize_indeed \setbox\b_framed_rendered\vpack to \d_overlay_height{\vss#1\vss}% \setbox\b_framed_rendered\hpack to \zeropoint{\box\b_framed_rendered\hss}% \ht\b_framed_rendered\zeropoint \dp\b_framed_rendered\zeropoint \box\b_framed_rendered} -\permanent\def\whateverrightframe#1% - {\setinstalledframedimensions +\permanent\protected\def\whateverrightframe#1% + {\pack_framed_overlay_initialize_indeed \setbox\b_framed_rendered\vpack to \d_overlay_height{\vss#1\vss}% \setbox\b_framed_rendered\hpack to \zeropoint{\hss\box\b_framed_rendered}% \ht\b_framed_rendered\zeropoint \dp\b_framed_rendered\zeropoint \box\b_framed_rendered} -\permanent\def\whatevertopframe#1% - {\setinstalledframedimensions +\permanent\protected\def\whatevertopframe#1% + {\pack_framed_overlay_initialize_indeed \setbox\b_framed_rendered\hpack to \d_overlay_width{\hss#1\hss}% \setbox\b_framed_rendered\vpack to \zeropoint{\box\b_framed_rendered\vss}% \ht\b_framed_rendered\zeropoint @@ -86,8 +70,8 @@ \box\b_framed_rendered \nointerlineskip} -\permanent\def\whateverbottomframe#1% - {\setinstalledframedimensions +\permanent\protected\def\whateverbottomframe#1% + {\pack_framed_overlay_initialize_indeed \setbox\b_framed_rendered\hpack to \d_overlay_width{\hss#1\hss}% \setbox\b_framed_rendered\vpack to \zeropoint{\vss\box\b_framed_rendered}% \ht\b_framed_rendered\zeropoint |