X-Git-Url: https://git.donarmstrong.com/lilypond.git?a=blobdiff_plain;f=mf%2Fparmesan-custodes.mf;h=4b167fee0c3711ed5faf7a002e9a529defc75632;hb=5ca271301d3af557f4720223736dc2d7b981c12b;hp=3efab9dfbe52c0d17a73e53c3ddd37dcf66a17f7;hpb=b02bb98ffea2c376ba67eb049b8ba6b04d76e084;p=lilypond.git

diff --git a/mf/parmesan-custodes.mf b/mf/parmesan-custodes.mf
index 3efab9dfbe..4b167fee0c 100644
--- a/mf/parmesan-custodes.mf
+++ b/mf/parmesan-custodes.mf
@@ -119,7 +119,7 @@ def custos_medicaea(expr verbose_name, internal_name, mudela_name,
 		a_w := 1.09;
 
 		save a, beta, ht, wd;
-		ht# = noteheight# * mag;
+		ht# = noteheight#; %%  * mag;
 		2beta# = ht# * b_h;
 		a# = beta# * a_b;
 		wd# = 0.4a# / a_w;	% width intentionally too small
@@ -192,7 +192,7 @@ def custos_vaticana(expr verbose_name, internal_name, mudela_name,
 		a_w := 1.09;
 
 		save a, beta, ht, wd;
-		ht# = noteheight# * mag;
+		ht# = noteheight# ; %%  * mag;
 		2beta# = ht# * b_h;
 		a# = beta# * a_b;
 		wd# = 0.4a# / a_w;