Hi David,

2011/10/12 David Nalesnik <david.nales...@gmail.com>

> Hi Harm,
>
> (...)
>    (beam-positions (ly:grob-property grob 'positions))
>    (beam-slant (if (> (car beam-positions) (cdr beam-positions)) -1 1))
>            (orig-slope (* beam-slant (/ (- beam-length-y beam-thickness)
> beam-length-x)))
>
> (...)
>
> Hope this helps!
>
> David
>

this works fine.
Seems I've been a blockhead.

Thanks to enlighten me.

Harm
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to