patch::: 1.5.4.jcn3

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

diff --git a/mf/feta-toevallig.mf b/mf/feta-toevallig.mf
index 21bacb30446566025ec64a5094e1f36c6914f499..9eeafb828df19f37b6aa48ff6a37ea8260985e92 100644 (file)
--- a/mf/feta-toevallig.mf
+++ b/mf/feta-toevallig.mf
@@ -26,7 +26,7 @@ fet_begingroup("accidentals");
 % a square pen).  [Wanske] does not mention this, so we'll just ignore 
 % this fact
 %
-fet_beginchar("Default Sharp" , "1", "sharp");
+fet_beginchar("Sharp" , "1", "sharp");
        set_char_box(0, 1.1 staff_space#, 1.5 staff_space#, 
                1.5 staff_space#);
 
@@ -82,7 +82,7 @@ fet_beginchar("Default Sharp" , "1", "sharp");
        labels(1,2,3,4);
        fet_endchar;
 
-fet_beginchar( "Default Natural", "0", "natural")
+fet_beginchar( "Natural", "0", "natural")
        set_char_box(0, 8/12 staff_space#, 1.5 staff_space#, 1.5 staff_space#);
 
        save interbeam, interstem, beamheight, beamwidth, 
@@ -203,13 +203,13 @@ enddef;
 %
 % unfortunately, 600dpi is not enough to show the brush of the stem.
 %
-fet_beginchar("Default Flat", "-1", "flat")
+fet_beginchar("Flat", "-1", "flat")
        set_char_box(1.2 stafflinethickness#, .8 staff_space#, .5 staff_space#, 2 staff_space#);
        draw_meta_flat(0, w, 1/3 staff_space);
        fet_endchar;
 
 
-fet_beginchar("Default Double Flat", "-2", "flatflat")
+fet_beginchar("Double Flat", "-2", "flatflat")
        save left_wid, overlap, right_wid;
        left_wid = .7;
        right_wid = .8;
@@ -220,7 +220,7 @@ fet_beginchar("Default Double Flat", "-2", "flatflat")
                right_wid *staff_space, 1/3 staff_space);
        fet_endchar;
 
-fet_beginchar("Default Double Sharp", "2", "sharpsharp")
+fet_beginchar("Double Sharp", "2", "sharpsharp")
        set_char_box(0, staff_space#, .5 staff_space#, .5 staff_space#);
        save klaverblad, klaversteel;