summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/pack-fen.mkxl
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-02-12 18:57:41 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-02-12 18:57:41 +0100
commit79bdc958cec8c084f8c8472e8f600c60969b03fa (patch)
tree97e489a6c23b01dae519aa36a535d62c301fabee /tex/context/base/mkxl/pack-fen.mkxl
parent45e121c1d9414786e677d931101af1357294e9b7 (diff)
downloadcontext-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.mkxl40
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