From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sun, 9 May 2004 09:15:25 +0000 (+0000)
Subject: * mf/feta-klef.mf:
X-Git-Tag: release/2.3.1~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=fba29eae3ea88e27f95d07f885fdfc8862143bec;p=lilypond.git

* mf/feta-klef.mf:
* mf/feta-bolletjes.mf: Oops.  Comment-out canvast test code.
---

diff --git a/ChangeLog b/ChangeLog
index fb977a3a2f..3628f227e0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2004-05-09  Jan Nieuwenhuizen  <janneke@gnu.org>
 
+	* mf/feta-klef.mf: 
+	* mf/feta-bolletjes.mf: Oops.  Comment-out canvast test code.
+
 	* Documentation/user/programming-interface.itely: Use @emph (was: @em).
 
 	* Documentation/user/out/tutorial.texi: Untrigger lilypond-book error.
diff --git a/mf/feta-bolletjes.mf b/mf/feta-bolletjes.mf
index 69f8977f19..ba3da5509b 100644
--- a/mf/feta-bolletjes.mf
+++ b/mf/feta-bolletjes.mf
@@ -529,7 +529,30 @@ fet_beginchar("X-Circled notehead", "2xcircle", "xcircledhead")
 fet_endchar;
 
 
-
 fet_endgroup("noteheads");
 
+% what is this doing here?
 define_pixels(black_notehead_width);
+
+
+if 0 = 1:
+
+% free space: ascii a-i
+code:=106;
+
+%
+% testing unicode/gnome-canvas
+%
+savecode:=code;
+code:=96;
+%fet_beginchar("Whole notehead", "0", "wholehead")
+fet_beginchar("Ascii a", "a", "a")
+	draw_outside_ellipse (1.80 - puff_up_factor / 3.0, 0, 0.707, 0);
+	undraw_inside_ellipse (1.30, 125 - puff_up_factor *10,
+			0.68, 2 stafflinethickness#,
+			(w /2, 0));
+%	draw_staff_outline (-2, 2, 0.5);
+fet_endchar;
+
+code:=savecode;
+fi
diff --git a/mf/feta-klef.mf b/mf/feta-klef.mf
index 0f9df26550..75b67886a5 100644
--- 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