Imported sources

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

diff --git a/mf/feta-beugel.mf b/mf/feta-beugel.mf
index 82f996fee958a0ab79173df772c801ab4af84599..8ab96f18c61ce34fdaa2db0c8cc535b9fa3daf5d 100644 (file)
--- a/mf/feta-beugel.mf
+++ b/mf/feta-beugel.mf
@@ -1,5 +1,11 @@
+
+
 input feta-autometric;
 input feta-macros;
+
+staffsize# := 20 pt#;  %% arbitrary.
+
+
 input feta-params;
 
 font_coding_scheme "feta braces";
@@ -69,7 +75,7 @@ enddef;
 save stafflinethickness;
 save increment;
 
-stafflinethickness := 0.5pt#;
+linethickness := 0.5pt#;
 increment := 0.5pt#;
 y := 10pt#;
 
@@ -92,9 +98,9 @@ for i := 0 step 1 until font_count:
     x := y / 15;
 
     increment := x / 10;
-    stafflinethickness :=  min (0.5pt#, y/150);
+    linethickness :=  min (0.5pt#, y/150);
     if i = font_count:
-      draw_brace (y, x, stafflinethickness);
+      draw_brace (y, x, linethickness);
     fi
   endfor;
 endfor