]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-bolletjes.mf
More formatting issues for lilypond-internals.
[lilypond.git] / mf / feta-bolletjes.mf
index 7be4addb5f29a88888f4c0dbab8067b8670f9e58..1926fc5224c99a091bfd8d4375af17001717cf93 100644 (file)
@@ -190,13 +190,13 @@ def draw_longa (expr up) =
 enddef;
 
 
-fet_beginchar ("Longa notehead", "u-2");
+fet_beginchar ("Longa notehead", "uM2");
        draw_longa (true);
 
        draw_staff (-2, 2, 0);
 fet_endchar;
 
-fet_beginchar ("Longa notehead", "d-2");
+fet_beginchar ("Longa notehead", "dM2");
        draw_longa (false);
 
        draw_staff (-2, 2, 0);
@@ -204,13 +204,13 @@ fet_endchar;
 
 
 if test > 0:
-       fet_beginchar ("Longa notehead", "u-2");
+       fet_beginchar ("Longa notehead", "uM2");
                draw_longa (true);
 
                draw_staff (-2, 2, 0.5);
        fet_endchar;
 
-       fet_beginchar ("Longa notehead", "d-2");
+       fet_beginchar ("Longa notehead", "dM2");
                draw_longa (false);
 
                draw_staff (-2, 2, 0.5);
@@ -249,7 +249,7 @@ def draw_brevis =
 enddef;
 
 
-fet_beginchar ("Brevis notehead", "s-1");
+fet_beginchar ("Brevis notehead", "sM1");
        draw_brevis;
 
        draw_staff (-2, 2, 0);
@@ -257,7 +257,7 @@ fet_endchar;
 
 
 if test > 0:
-       fet_beginchar ("Brevis notehead", "s-1");
+       fet_beginchar ("Brevis notehead", "sM1");
                draw_brevis;
 
                draw_staff (-2, 2, 0.5);