* The grand 2005-2006 replace.

[lilypond.git] / mf / feta-autometric.mf

diff --git a/mf/feta-autometric.mf b/mf/feta-autometric.mf
index 0d9f0358699e39dad0aacc7d0dfb0a8301422d02..e500999ec48633ed9fd34eb1d64c3f77afe47986 100644 (file)
--- a/mf/feta-autometric.mf
+++ b/mf/feta-autometric.mf
@@ -4,7 +4,7 @@
 % source file of the Feta (not an acronym for Font-En-Tja)
 % pretty-but-neat music font
 %
-% (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+% (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 %          Jan Nieuwenhuizen <janneke@gnu.org>
 %
 % these macros help create ascii logging output
@@ -66,7 +66,7 @@ def autometric_parameter (expr name, value) =
 enddef;
 
 
-def autometric_output_char=
+def autometric_output_char =
        message "@{char@:" & charnamestr
                & "@:" & decimal charcode
                & "@:" & decimal charbp
@@ -203,7 +203,12 @@ def fet_beginchar (expr name, id_lit) =
 
        % addition for mf2pt1
        if known bp_per_pixel:
-               special "% MF2PT1: glyph_name " & feta_group & "." & idstr;
+               if known feta_group:
+                       special "% MF2PT1: glyph_name "
+                               & feta_group & "." & idstr;
+               else:
+                       special "% MF2PT1: glyph_name " & idstr;
+               fi;
        fi;
 
        no_dimen_beginchar (incr code) name;
@@ -237,7 +242,7 @@ endgroup;
 enddef;
 
 
-def fet_endchar=
+def fet_endchar =
        autometric_output_char;
        breapth_endchar;
 enddef;