]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-klef.mf
* mf/feta-klef.mf (draw_gclef): Move z10' slightly so that the
[lilypond.git] / mf / feta-klef.mf
index c9e56a8c9266d9a451bcd6e9da804c445ac9f45e..dd0ccbfdc0b2a55256dc8f64bd068e0ce712e6a9 100644 (file)
@@ -387,8 +387,8 @@ def draw_gclef (expr reduction) =
        penpos6 (thinnib, angle (direction 1 of pat) + 90);
 
        % two auxiliary points to simulate `draw' with `penstroke'
-       z10' = point 0.5 of pat;
-       penpos10' (thinnib, angle (direction 0.5 of pat) + 90);
+       z10' = point 0.3 of pat;
+       penpos10' (1.3 thinnib, angle (direction 0.3 of pat) + 50);
 
        z11' = point 1.5 of pat;
        penpos11' (thinnib, angle (direction 1.5 of pat) + 90);