X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-generic.mf;h=311b75d040fc5755ed96e758802f1a3ad3550421;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=53ce2688d118cf8d7b934ca3ef8ebb9e03c8a8ba;hpb=b02bb98ffea2c376ba67eb049b8ba6b04d76e084;p=lilypond.git

diff --git a/mf/parmesan-generic.mf b/mf/parmesan-generic.mf
index 53ce2688d1..311b75d040 100644
--- a/mf/parmesan-generic.mf
+++ b/mf/parmesan-generic.mf
@@ -1,38 +1,42 @@
-% -*-Fundamental-*-
-% parmesan-generic.mf --  implement generic stuff: include lots of files,
-% but don't set dims.
+% -%-Fundamental-%- -*-Metafont-*-
+% parmesan-generic.mf -- implement generic stuff: include lots of files,
+% but don't set dimensions.
 %
 % source file of LilyPond's pretty-but-neat music font
-% 
-% (c) 2002 Juergen Reuter <reuter@ipd.uka.de>
-% 
+%
+% (c) 2002--2008 Juergen Reuter <reuter@ipd.uka.de>
+%
 
 
 if test = -1:
 	mode := smoke;
-fi
+fi;
 
 mode_setup;
-%
 
-input feta-macros;
+staffsize# := design_size * pt#;
 
-make_pen_stack;
-make_picture_stack;
+input feta-macros;
 input feta-params;
 
-font_x_height  staff_space#;
+input parmesan-macros;
+
+
+font_x_height staff_space#;
 
-if test = 0: 
-	input parmesan-rests;
-	input parmesan-heads;
-	input parmesan-clefs;
-	input parmesan-custodes
-	input parmesan-accidentals;
-	input parmesan-flags;
-	input parmesan-timesig;
-	input parmesan-scripts;
 
-else:
+fet_beginfont ("parmesan", design_size, "parmesanMusic");
+	if test = 0:
+		input parmesan-rests;
+		input parmesan-heads;
+		input parmesan-clefs;
+		input parmesan-custodes
+		input parmesan-accidentals;
+		input parmesan-flags;
+		input parmesan-timesig;
+		input parmesan-scripts;
+		input parmesan-dots;
+	else:
 
-fi
+	fi;
+fet_endfont;