Am 20.08.2016 um 12:25 schrieb Pierre Perol-Schneider:
(case duration
((0) (grob-interpret-markup grob (markup "0")))
((1) (grob-interpret-markup grob (markup "1")))
((2) (grob-interpret-markup grob (markup "2")))
((3) (grob-interpret-markup grob (markup "3")))
((4) (grob-interpret-markup grob (markup "4")))
((5) (grob-interpret-markup grob (markup "5")))
((6) (grob-interpret-markup grob (markup "6")))
((7) (grob-interpret-markup grob (markup "7")))
(else (ly:note-head::print grob)))))
Why not simply use number->string here? Do you really want to print
actual note heads for breve (and longer) and 256th (and shorter) notes?
\override NoteHead.stencil =
#(lambda (grob)
(grob-interpret-markup grob
(markup
(number->string
(ly:duration-log
(ly:event-property (event-cause grob) 'duration))))))
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
