From 439a48cdfa09cd22846e929ae296678c8d32243f Mon Sep 17 00:00:00 2001 From: Werner Lemberg Date: Fri, 28 Jan 2005 14:59:08 +0000 Subject: [PATCH] * mf/feta-macros.mf (draw_bulb): Improved. --- ChangeLog | 1 + mf/feta-macros.mf | 13 +++++++++---- 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index c2d2e589ae..65f026242d 100644 --- a/ChangeLog +++ b/ChangeLog @@ -6,6 +6,7 @@ * mf/feta-macros.mf (soft_start_penstroke, soft_end_penstroke): New macros. + (draw_bulb): Improved. * mf/feta-pendaal.mf ("Pedal asterisk"): Remove workaround for metapost bug. diff --git a/mf/feta-macros.mf b/mf/feta-macros.mf index 83ffe0fec3..fa236fd01a 100644 --- a/mf/feta-macros.mf +++ b/mf/feta-macros.mf @@ -438,7 +438,8 @@ enddef; def draw_bulb (expr turndir, zl, zr, bulb_rad, radius_factor)= begingroup; - save rad, ang; + save rad, ang, pat; + path pat; clearxy; @@ -455,9 +456,13 @@ begingroup; labels (0', 1', 2'); - fill zr{dir (ang + turndir * 90)} - .. z1' - .. z2' + pat = zr{dir (ang + turndir * 90)} + .. z1' + .. z2' + .. cycle; + + % avoid grazing outlines + fill subpath (0, 2.5) of pat -- cycle; endgroup enddef; -- 2.39.2