From: fred <fred>
Date: Sun, 24 Mar 2002 20:00:11 +0000 (+0000)
Subject: lilypond-0.1.22
X-Git-Tag: release/1.5.59~3741
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=7daab30170e0d3457c91bc31cc74af9e5db2d56c;p=lilypond.git

lilypond-0.1.22
---

diff --git a/mf/autometric.mf b/mf/autometric.mf
index cd924a3aab..8cddab9100 100644
--- a/mf/autometric.mf
+++ b/mf/autometric.mf
@@ -15,30 +15,30 @@
 def fet_beginfont(expr name,size) =
 	font_identifier:=name&decimal size;
 	font_size size;
-	message "@{font:"&name&":"&decimal size&"@}";
+	message "@{font@:"&name&"@:"&decimal size&"@}";
 	message "";
 	enddef;
 
 def fet_endfont(expr name) =
-	message "@{tnof:"&name&"@}";
+	message "@{tnof@:"&name&"@}";
 	message "";
 	enddef;
 
 % group or table?
 def fet_begingroup(expr name) =
-	message "@{group:"&name&"@}";
+	message "@{group@:"&name&"@}";
 	message "";
 	begingroup
 enddef;
 
 def fet_endgroup(expr name) =
 	endgroup;
-	message "@{puorg:"&name&"@}";
+	message "@{puorg@:"&name&"@}";
 	message "";
 enddef;
 
 def autometric_output_char=
-	message "@{char:"&charnamestr&":"&decimal charcode&":"&decimal charbp&":"&decimal charwd&":"&decimal chardp&":"&decimal charht&":"&idstr&":"&texstr&"@}";
+	message "@{char@:"&charnamestr&"@:"&decimal charcode&"@:"&decimal charbp&"@:"&decimal charwd&"@:"&decimal chardp&"@:"&decimal charht&"@:"&idstr&"@:"&texstr&"@}";
 enddef;
 
 
@@ -108,7 +108,7 @@ enddef;
 def breapth_endchar =
 	scantokens extra_endchar;
 	if proofing > 0: makebox_with_breapth(proofrule); fi
-	chardx := w + b;
+	chardx := 10*(w + b);
 	shipit;
 	endgroup
 enddef;