X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Ffeta-naturals.mf;h=e1c1e96b7445cbf8480b1cc705dbc2de435a18de;hb=777a404670230b89d98210cdb3d18447c27ccc42;hp=73cde21c97a1eaa8e26d45a59603437b991e5c16;hpb=cfb3105646db41346c7739ff8f8bc089b4c66c84;p=lilypond.git

diff --git a/mf/feta-naturals.mf b/mf/feta-naturals.mf
index 73cde21c97..e1c1e96b74 100644
--- a/mf/feta-naturals.mf
+++ b/mf/feta-naturals.mf
@@ -126,9 +126,7 @@ def draw_natural (expr arrowup, arrowdown) =
 		w := w + extendright;
 	fi;
 
-	remember_pic := currentpicture;
-
-	draw_staff (-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;
-