]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-klef.mf
release: 1.3.129
[lilypond.git] / mf / feta-klef.mf
index 44eee6ca8d2a5a4f8404d08078c7f2216fa82865..c1e3235257c43960af8a96d307173ce6476b3afc 100644 (file)
@@ -1054,8 +1054,8 @@ def draw_percussion_clef(expr reduction) =
        save reduced_il;
        reduced_il# = staff_space# * reduction;
        define_pixels(reduced_il);
-       set_char_box(0,.6reduced_il#,reduced_il#,reduced_il#);
-        pickup pencircle scaled 1.5 stafflinethickness;
+       set_char_box(.5reduced_il#,1.25reduced_il#,reduced_il#,reduced_il#);
+        pickup pencircle scaled 3.33 stafflinethickness;
        draw (b,h) -- (b,-d);
        draw (w,h) -- (w,-d);
 enddef;