From: fred <fred>
Date: Wed, 27 Mar 2002 02:06:17 +0000 (+0000)
Subject: lilypond-1.5.36
X-Git-Tag: release/1.5.59~290
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c8c3250b13980ea36348f2996dc3f00b28dd8fd4;p=lilypond.git

lilypond-1.5.36
---

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;
diff --git a/mf/parmesan-heads.mf b/mf/parmesan-heads.mf
index 33aeea3091..ef9a78dcaf 100644
--- a/mf/parmesan-heads.mf
+++ b/mf/parmesan-heads.mf
@@ -272,7 +272,7 @@ def punctum_char (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# = 2a# / a_w;
@@ -596,7 +596,7 @@ fet_beginchar("Solesmes oriscus", "0solesmes_oriscus",
 	a_w := 1.09;
 
 	save a, beta, ht, wd;
-	ht# = noteheight# * mag;
+	ht# = noteheight#; %%  * mag;
 	2beta# = ht# * b_h;
 	a# = beta# * a_b;
 	wd# = 2a# / a_w;