diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-11-05 16:27:53 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-11-05 16:27:53 +0100 |
commit | 7d9b63e35fb270ed0a23d82672793984f219f086 (patch) | |
tree | d06d9221ee2a2e06d28b02e97fa6a9a1f7553365 /tex/context/base/mkiv/pack-bar.mkiv | |
parent | 343fdd99ef79884fca1f86b49c950e03939aeedf (diff) | |
download | context-7d9b63e35fb270ed0a23d82672793984f219f086.tar.gz |
2020-11-05 15:23:00
Diffstat (limited to 'tex/context/base/mkiv/pack-bar.mkiv')
-rw-r--r-- | tex/context/base/mkiv/pack-bar.mkiv | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/pack-bar.mkiv b/tex/context/base/mkiv/pack-bar.mkiv index f299f04f3..99323b435 100644 --- a/tex/context/base/mkiv/pack-bar.mkiv +++ b/tex/context/base/mkiv/pack-bar.mkiv @@ -63,7 +63,8 @@ \unexpanded\def\verticalpositionbar[#1]% {\vbox to \vsize - {\setuppositionbar[#1]% + {\hsize\positionbarparameter\c!width + \setuppositionbar[#1]% \usepositionbarstyleandcolor\c!style\c!color \vskip\zeropoint\s!plus \positionbarparameter\c!n \s!fill \vskip\zeropoint\s!plus-\positionbarparameter\c!min\s!fill @@ -75,17 +76,18 @@ {\hpack to \hsize {\setuppositionbar[#1]% \usepositionbarstyleandcolor\c!style\c!color - \leaders\vrule\hskip\zeropoint\s!plus\numexpr\positionbarparameter\c!n-\positionbarparameter\c!min+\plusone\relax\s!fill \vrule\s!width\zeropoint\s!height\positionbarparameter\c!height\s!depth\positionbarparameter\c!depth + \leaders\vrule\hskip\zeropoint\s!plus\numexpr\positionbarparameter\c!n-\positionbarparameter\c!min+\plusone\relax\s!fill \hskip\zeropoint\s!plus \positionbarparameter\c!max\s!fill \hskip\zeropoint\s!plus-\positionbarparameter\c!n \s!fill}} \unexpanded\def\verticalgrowingbar[#1]% {\vpack to \vsize - {\setuppositionbar[#1]% + {\hsize\positionbarparameter\c!width + \setuppositionbar[#1]% \usepositionbarstyleandcolor\c!style\c!color - \leaders\hrule\vskip\zeropoint\s!plus\numexpr\positionbarparameter\c!n-\positionbarparameter\c!min+\plusone\relax\s!fill \hrule\s!width\positionbarparameter\c!width\s!height\zeropoint\s!depth\zeropoint + \leaders\hrule\vskip\zeropoint\s!plus\numexpr\positionbarparameter\c!n-\positionbarparameter\c!min+\plusone\relax\s!fill \vskip\zeropoint\s!plus \positionbarparameter\c!max\s!fill \vskip\zeropoint\s!plus-\positionbarparameter\c!n \s!fill}} |