* mf/feta-klef.mf:

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

diff --git a/mf/feta-klef.mf b/mf/feta-klef.mf
index 0f9df26550b92114e7364063d50f79a01ef4c23d..75b67886a5dd6f53d21cd2d6513d2adc96c0d3d2 100644 (file)
--- a/mf/feta-klef.mf
+++ b/mf/feta-klef.mf
@@ -449,6 +449,7 @@ fet_beginchar("G clef", "G", "trebleclef")
        fi;
        draw_gclef(1.0);
 fet_endchar;
+
 fet_beginchar("G clef", "G_change", "ctrebleclef")
        draw_gclef(0.8);
 fet_endchar;
@@ -669,3 +670,24 @@ fet_beginchar("tab clef (reduced)", "tab_change", "ctabclef")
 fet_endchar;
 
 fet_endgroup("clefs");
+
+if 0 = 1:
+
+%
+% testing unicode/gnome-canvas
+%
+
+savecode:=code;
+code:=97;
+fet_beginchar("Ascii b", "b", "b")
+%%fet_beginchar("G clef", "G", "trebleclef")
+       if test_staff = 1:
+               draw_staff(-1,3, 0.0);
+       fi;
+       draw_gclef(1.0);
+       %% charnamestr:="Ascii b";
+fet_endchar;
+
+code:=savecode;
+
+fi