X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-scripts.mf;h=1aebbe5c57e24fe23117fafaa9addffb395682d6;hb=e58fdeceb55cf06034bc97fab5d6294704158519;hp=435cc86a13c7775b5d352a5c050c54738e0b7460;hpb=38367909027cad1f36c4dde2f7ceaab22b3290aa;p=lilypond.git

diff --git a/mf/parmesan-scripts.mf b/mf/parmesan-scripts.mf
index 435cc86a13..1aebbe5c57 100644
--- a/mf/parmesan-scripts.mf
+++ b/mf/parmesan-scripts.mf
@@ -3,7 +3,7 @@
 % 
 % source file of LilyPond's pretty-but-neat music font
 % 
-% (c) 2002--2006 Juergen Reuter <reuter@ipd.uka.de>
+% (c) 2002--2007 Juergen Reuter <reuter@ipd.uka.de>
 % 
 
 fet_begingroup ("scripts");
@@ -15,14 +15,14 @@ fet_beginchar ("ictus", "ictus");
 
 	define_pixels (wd, ht);
 
-	save ellipse;
+	save ellipse, T;
 	path ellipse;
+	transform T;
 
-	pickup pencircle xscaled wd
-			 yscaled blot_diameter;
-
-	ellipse := fullcircle xscaled wd
-			      yscaled blot_diameter;
+	T := identity xscaled wd
+		      yscaled blot_diameter;
+	pickup pencircle transformed T;
+	ellipse := fullcircle transformed T;
 
 	set_char_box (wd# / 2, wd# / 2, ht# / 2, ht# / 2);