]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-naturals.mf
unify formatting and indentation
[lilypond.git] / mf / feta-naturals.mf
index aca7d3b5cf180fb081ae3b07691f21a9c080d6d3..e1c1e96b7445cbf8480b1cc705dbc2de435a18de 100644 (file)
@@ -126,9 +126,7 @@ def draw_natural (expr arrowup, arrowdown) =
                w := w + extendright;
        fi;
 
-       remember_pic := currentpicture;
-
-        draw_staff_if_debugging (-2, 2, 0);
+        draw_staff_if_debugging (-2, 2);
 enddef;
 
 
@@ -137,29 +135,16 @@ fet_beginchar ("Natural", "natural");
 fet_endchar;
 
 
-draw_shifted_too;
-
-
 fet_beginchar ("Arrowed Natural (arrow up)", "natural.arrowup");
        draw_natural (true, false);
 fet_endchar;
 
 
-draw_shifted_too;
-
-
 fet_beginchar ("Arrowed Natural (arrow down)", "natural.arrowdown");
        draw_natural (false, true);
 fet_endchar;
 
 
-draw_shifted_too;
-
-
 fet_beginchar ("Arrowed Natural (arrows up and down)", "natural.arrowboth");
        draw_natural (true, true);
 fet_endchar;
-
-
-draw_shifted_too;
-