Harm, and what if I don't want to rotate my note head along with stem-dir? How
to modify your code then? Some note heads look beeter when they are not being
rotated.
>
> If you only want noteheads of doThin-type, try:
>
> \version "2.18.0"
>
> #(define nhg
> (lambda (grob)
> (let* ((stil (ly:note-head::print grob))
> (dur-log (ly:grob-property grob 'duration-log))
> (nh-id-nr (if (>= dur-log 2) 2 1))
> (stem (ly:grob-object grob 'stem))
> (stem-dir (ly:grob-property stem 'direction))
> (new-note-head-stil
> (grob-interpret-markup grob
> (markup #:musicglyph (format #f "noteheads.u~adoThin"
> nh-id-nr)))))
>
> (ly:stencil-scale new-note-head-stil 1 stem-dir))))
>
> \layout {
> \context {
> \Voice
> \override NoteHead.stencil = #nhg
> }
> }
>
> \relative c '' {
> c1 c2 \repeat unfold 4 c8
> \repeat unfold 64 c4
> }
>
>
> HTH,
> Harm
_______________________________________________
bug-lilypond mailing list
bug-lilypond@gnu.org
https://lists.gnu.org/mailman/listinfo/bug-lilypond
