* mf/parmesan-clefs.mf: use # quantities for char_box

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

diff --git a/mf/parmesan-clefs.mf b/mf/parmesan-clefs.mf
index 0cdf84899ac8ae4eac43df56d2f47c8744b5d7ba..e7c603e271fe275ca9b7960e5eb877462fc9b37c 100644 (file)
--- a/mf/parmesan-clefs.mf
+++ b/mf/parmesan-clefs.mf
@@ -111,7 +111,7 @@ def draw_vaticana_fa_clef(expr exact_center, reduction) =
        draw zd -- ze;
 
        %right-handed puncta as in do clef
-       draw_vaticana_do_clef(exact_center + (0.55reduced_il, 0), reduction);
+       draw_vaticana_do_clef(exact_center + (0.55reduced_il#, 0), reduction);
 
        set_char_box(0 - xpart exact_center,
                     1.05reduced_il# + xpart exact_center,
@@ -228,7 +228,7 @@ def draw_medicaea_fa_clef(expr exact_center, reduction) =
        draw zc -- zd;
 
        %right-handed puncta as in do clef
-       draw_medicaea_do_clef(exact_center + (0.7reduced_il, 0), reduction);
+       draw_medicaea_do_clef(exact_center + (0.7reduced_il#, 0), reduction);
 
        set_char_box(0 - xpart exact_center,
                     1.7reduced_il# + xpart exact_center,
@@ -936,7 +936,7 @@ fet_endchar;
 
 def draw_hufnagel_do_fa_clef(expr exact_center, reduction) =
        draw_hufnagel_do_clef(exact_center, reduction);
-       draw_hufnagel_fa_clef(exact_center + (0, -2staff_space), reduction);
+       draw_hufnagel_fa_clef(exact_center + (0, -2staff_space#), reduction);
        set_char_box(0 - xpart exact_center,
                     1.20reduced_il# + xpart exact_center,
                     1.15reduced_il# + 2staff_space# - ypart exact_center,