Merge branch 'master' of git+ssh://jneem@git.sv.gnu.org/srv/git/lilypond

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

diff --git a/mf/parmesan-generic.mf b/mf/parmesan-generic.mf
index 94a5c52f26e37a98da77a307e721b7b5f192258f..7114bc6837dd04a9dcec261b2c61bc41cbbf6af6 100644 (file)
--- a/mf/parmesan-generic.mf
+++ b/mf/parmesan-generic.mf
@@ -1,11 +1,10 @@
-% 
-% feta-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 dims.
 %
-% source file of the Feta (defintively not an abbreviation for Font-En-Tja)
-% music font
+% source file of LilyPond's pretty-but-neat music font
 % 
-% (c) 1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+% (c) 2002--2006 Juergen Reuter <reuter@ipd.uka.de>
 % 
 
 
@@ -15,15 +14,15 @@ fi
 
 mode_setup;
 %
+staffsize# := design_size * pt#;
 
 input feta-macros;
-
-make_pen_stack;
-make_picture_stack;
 input feta-params;
 
+
 font_x_height  staff_space#;
 
+fet_beginfont("parmesan", design_size, "parmesanMusic")
 if test = 0: 
        input parmesan-rests;
        input parmesan-heads;
@@ -32,7 +31,10 @@ if test = 0:
        input parmesan-accidentals;
        input parmesan-flags;
        input parmesan-timesig;
-
+       input parmesan-scripts;
+       input parmesan-dots;
 else:
 
 fi
+fet_endfont;
+