*** empty log message ***

[lilypond.git] / mf / feta-schrift.mf

diff --git a/mf/feta-schrift.mf b/mf/feta-schrift.mf
index 16a3eefca41038f5dd3368bf397e523392a54043..629d5a5b8cf4fc16901dc9cd75a3216e67ddc95a 100644 (file)
--- a/mf/feta-schrift.mf
+++ b/mf/feta-schrift.mf
@@ -4,7 +4,7 @@
 % source file of the Feta (defintively not an abbreviation for Font-En-Tja)
 % music font
 %
-% (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+% (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 %      Jan Nieuwenhuizen <janneke@gnu.org>
 %
 
@@ -460,12 +460,12 @@ def draw_portato =
 enddef;
 
 
-fet_beginchar ("portato/tenuto with staccato", "dportato");
+fet_beginchar ("portato/tenuto with staccato", "uportato");
        draw_portato;
 fet_endchar;
 
 
-fet_beginchar ("portato/tenuto with staccato", "uportato");
+fet_beginchar ("portato/tenuto with staccato", "dportato");
        draw_portato;
        y_mirror_char
 fet_endchar;
@@ -822,7 +822,6 @@ fet_beginchar ("Trill (`tr')", "trill");
             .. z4r{down}
             .. z3r{left}
             ..tension (1.5 + .7 slant).. z2r{up}
-            .. z1r
             -- cycle;
 
        z5' = point 1.1 of krul_p;
@@ -1155,15 +1154,15 @@ fet_beginchar ("Varied Coda", "varcoda");
        set_char_box (codawidth# + thick#, codawidth# + thick#,
                      codaheight# + thick#, codaheight# + thick#);
 
-       x1 = -codawidth;
+       x1 = -codawidth + .5 thick;
        y1 = y2 - thin;
-       x2 = codawidth;
+       x2 = codawidth - .5 thick;
        y2 = codaheight;
        draw_block (z1, z2);
 
-       x3 = x1;
+       x3 = -codawidth;
        y3 = -codaheight;
-       x4 = x1 + thick;
+       x4 = x3 + thick;
        y4 = y2;
        draw_block (z3, z4);