diff options
| author | Hans Hagen <pragma@wxs.nl> | 2012-05-11 13:19:00 +0200 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2012-05-11 13:19:00 +0200 |
| commit | af4ff2510c2a18374dec07abe1742e49dd99fc72 (patch) | |
| tree | 2cb4803a4d8816b68c59fe4e45179c7b2db49e18 /metapost | |
| parent | b25ebfbda7efe454220aef8e6ef7a5486821e0dc (diff) | |
| download | context-af4ff2510c2a18374dec07abe1742e49dd99fc72.tar.gz | |
beta 2012.05.11 13:19
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/base/mp-apos.mpiv | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/metapost/context/base/mp-apos.mpiv b/metapost/context/base/mp-apos.mpiv index 34dd57576..fad185b78 100644 --- a/metapost/context/base/mp-apos.mpiv +++ b/metapost/context/base/mp-apos.mpiv @@ -68,6 +68,7 @@ enddef ; def anch_sidebars_draw (expr p_b_self, p_e_self, y_b_self, y_e_self, h_b_self, d_e_self, x, y, w, h, alternative, distance, linewidth, linecolor, topoffset, bottomoffset) = + % beware, we anchor at (x,y) begingroup ; if alternative = 1 : interim linecap := rounded ; @@ -88,8 +89,8 @@ def anch_sidebars_draw (expr p_b_self, p_e_self, y_b_self, y_e_self, h_b_self, d a := (-distance,h) ; b := (-distance,0) ; fi ; - a := (xpart a, min(ypart a + topoffset, y+h)) ; - b := (xpart b, max(ypart b - bottomoffset,y )) ; + a := (xpart a, min(ypart a + topoffset, h)) ; + b := (xpart b, max(ypart b - bottomoffset,0)) ; draw a -- b if alternative = 1 : |