Run `make grand-replace'.

[lilypond.git] / mf / parmesan-generic.mf

diff --git a/mf/parmesan-generic.mf b/mf/parmesan-generic.mf
index 53ce2688d118cf8d7b934ca3ef8ebb9e03c8a8ba..311b75d040fc5755ed96e758802f1a3ad3550421 100644 (file)
--- 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;