X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Ffeta-scripts.mf;h=d04ed18b7b5e99c2641079b77e6af9a459a634ad;hb=15f4f4c7c1d0e8c2f904981586145f478a31b65c;hp=b3843960c27329119fadc6d7b0b932894b3088dd;hpb=70a015a514dd4af9e9aa7d643f8bbcb1e58c0a70;p=lilypond.git

diff --git a/mf/feta-scripts.mf b/mf/feta-scripts.mf
index b3843960c2..d04ed18b7b 100644
--- a/mf/feta-scripts.mf
+++ b/mf/feta-scripts.mf
@@ -1447,17 +1447,18 @@ enddef;
 
 
 fet_beginchar ("Arpeggio", "arpeggio");
+	begingroup;
 	save height, overshoot, width;
-	height# = staff_space#;
-	width# = 0.8 height#;
-	overshoot# = 0.25 staff_space#;
+	height# := staff_space#;
+	width# := 0.8 * height#;
+	overshoot# := 0.25 * staff_space#;
 	define_pixels (height, overshoot, width);
-
 	set_char_box (0, width#, 0, height#);
 	draw_arpeggio;
 	penlabels (range 1 thru 9);
 
 	draw_staff (-2, 2, 0.0);
+	endgroup;
 fet_endchar;
 
 
@@ -1468,7 +1469,8 @@ fet_endchar;
 %
 
 fet_beginchar ("Trill_element", "trill_element");
-	save height, overshoot;
+	begingroup;
+	save height, overshoot, width;
 	height# = staff_space#;
 	width# = 0.8 height#;
 	overshoot# = 0.25 staff_space#;
@@ -1480,6 +1482,7 @@ fet_beginchar ("Trill_element", "trill_element");
 	currentpicture := currentpicture shifted -(width / 2, height / 2);
 	currentpicture := currentpicture rotated 90;
 	currentpicture := currentpicture shifted (height / 2, width / 2);
+	endgroup;
 fet_endchar;