-def write_fontlist (file, global_info, charmetrics):
- ## nm = global_info['FontFamily']
- nm = font_family
- per_line = 2
- file.write (
-r"""%% LilyPond file to list all font symbols and the corresponding names
-%% Automatically generated by mf-to-table.py
-
-\score {
- \lyrics { \time %d/8
-""" % (2 * per_line + 1))
-
- count = 0
- for m in charmetrics:
- count += 1
-
- ## \musicglyph and \markup require "_" to be escaped
- ## differently
- scm_string = re.sub ('_', r'_', m['name'])
-
- file.write (''' \\markup { \\raise #0.75 \\vcenter
- \\musicglyph #"%s"
- \\typewriter " %s" } 4
- \\noBreak
- ''' % (scm_string, scm_string))
-
- if (count % per_line) == 0:
- file.write (' \\skip 8 \\break\n')
- file.write (r""" }
-
- \layout {
- interscoreline = 1.0
- indent = 0.0 \cm
- \context {
- \Lyrics
- \override SeparationItem #'padding = #2
- minimumVerticalExtent = ##f
- }
- \context {
- \Score
- \remove "Bar_number_engraver"
- }
- }
-}
-""")
-
-