2016-10-21 22:48 GMT+02:00 Thomas Morley <thomasmorle...@gmail.com>:
> 2016-10-21 22:39 GMT+02:00 Karol Majewski <karo...@wp.pl>:
>> OK, this does change skyline-padding in chords, but unfotunately it also
>> changes skyline-padding between single notes (see example: c'8~ c'4). I'd
>> like tied chords to have different skyline-padding value than tied single
>> notes.
>>
>> hint =
>> \override TieColumn.before-line-breaking =
>> #(lambda (grob)
>> (for-each
>> (lambda (clr tie)
>> (ly:grob-set-nested-property! tie '(details skyline-padding) 5)
>> (ly:grob-set-property! tie 'color clr))
>> (circular-list red green)
>> (ly:grob-array->list (ly:grob-object grob 'ties))))
>>
>> \relative c' {
>> \hint
>> <c e g c e>4~
>> <c e g c e>
>> c'8~ c'4.
>> }
>
>
>
> Well, I wasn't aware we create a TieColumn-grob even for stand-alone Ties.
> Then you probably should restrict it to occarabces of more than one
Omg, should read:
Then you probably should restrict it to occurrences of more than one
> Tie at a time. Leading to:
>
> hint =
> \override TieColumn.before-line-breaking =
> #(lambda (grob)
> (let ((ties (ly:grob-array->list (ly:grob-object grob 'ties))))
> (if (> (length ties) 1)
> (for-each
> (lambda (clr tie)
> (ly:grob-set-nested-property! tie '(details skyline-padding) 5)
> (ly:grob-set-property! tie 'color clr))
> (circular-list red green)
> ties))))
>
> \relative c' {
> \hint
> <c e g c e>4~
> <c e g c e>
> <c'>8~ <c>4.
> }
>
> Cheers,
> Harm
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
