X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-dots.mf;h=4e77d9c465c64d3b67e123ca41b738fc71b4e716;hb=0b716515bfd610a04bbe4289f171f3cd80a0fc14;hp=1c09d51efb907a48130681716fedcdf35d65c98f;hpb=8864a7cc89abc6d910896aa4681e89fd71c5e4f1;p=lilypond.git

diff --git a/mf/parmesan-dots.mf b/mf/parmesan-dots.mf
index 1c09d51efb..4e77d9c465 100644
--- a/mf/parmesan-dots.mf
+++ b/mf/parmesan-dots.mf
@@ -35,24 +35,29 @@ fet_beginchar ("duration dot", "dotvaticana");
 	set_char_box (0, dot_diam#, .5 dot_diam#, .5 dot_diam#);
 fet_endchar;
 
+
 %%%%%%%%%%%%%
 %%%
 %%% Code for Kievan Music Notation
 %%%
 %%%%%%%%%%%%%
 
+
 save kievan_dot_diam;
 kievan_dot_diam# := staff_space# - stafflinethickness#;
 define_whole_pixels (kievan_dot_diam);
 
-fet_beginchar ("kievan augmentation dot", "dotkievan");
-	% pars for superellipse are right, top, left, bottom
-	fill superellipse((kievan_dot_diam, 0),
-			  (kievan_dot_diam / 2, kievan_dot_diam / 2),
-			  (0, 0),
-			  (kievan_dot_diam / 2, -kievan_dot_diam / 2),
+
+fet_beginchar ("Kievan augmentation dot", "dotkievan");
+	% parameters for superellipse are right, top, left, bottom
+	fill superellipse ((kievan_dot_diam, 0),
+			   (kievan_dot_diam / 2, kievan_dot_diam / 2),
+			   (0, 0),
+			   (kievan_dot_diam / 2, -kievan_dot_diam / 2),
 			   0.51);
-	set_char_box (0, kievan_dot_diam#, 0.5 kievan_dot_diam#, 0.5 kievan_dot_diam#);
+
+	set_char_box (0, kievan_dot_diam#,
+		      0.5 kievan_dot_diam#, 0.5 kievan_dot_diam#);
 fet_endchar;
 
 fet_endgroup ("dots");