2004-12-19 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ * mf/feta-bolletjes.mf (triangle): add s to 0triangle.
+
* mf/GNUmakefile (ALL_GEN_FILES): make SVG files too.
2004-12-19 Jan Nieuwenhuizen <janneke@gnu.org>
-\version "2.4.0"
+\version "2.5.2"
\header { texidoc=" You can write stencil callbacks in Scheme, thus
providing custom glyphs for notation elements. A simple example is
"
(let* ((fn (ly:get-default-font grob))
- (pclose (ly:find-glyph-by-name fn "accidentals-rightparen"))
- (popen (ly:find-glyph-by-name fn "accidentals-leftparen"))
+ (pclose (ly:font-get-glyph fn "accidentals.rightparen"))
+ (popen (ly:font-get-glyph fn "accidentals.leftparen"))
(subject (callback grob))
; remember old size
\lookup #"noteheads-0"
\char #53
}
- \musicglyph #"accidentals--1"
+ \musicglyph #"accidentals.-1"
\combine "X" "+"
\combine "o" "/"
\box \column { \line { "string 1" } \line { "string 2" } }
#:hspace 2.0
#:override '(font-family . music) #:line (#:lookup "noteheads-0"
#:char 53)
- #:musicglyph "accidentals--1"
+ #:musicglyph "accidentals.-1"
#:combine "X" "+"
#:combine "o" "/"
#:box #:column ("string 1" "string 2")
fi
enddef;
-fet_beginchar("Whole trianglehead", "0triangle")
+fet_beginchar("Whole trianglehead", "s0triangle")
save hei,xs;
save llap;
save tilt;
def conv (str):
str = re.sub ('ly:find-glyph-by-name', 'ly:font-get-glyph', str)
+ str = re.sub ('"accidentals-', '"accidentals.', str)
+ str = re.sub ('"scripts-', '"scripts.', str)
return str
conversions.append (((2, 5, 2),
conv,
- 'ly:find-glyph-by-name -> ly:font-get-glyph'))
+ 'ly:find-glyph-by-name -> ly:font-get-glyph, remove - from glyphnames.'))
################################