Re: Tie settings question

[Thomas Morley]

2016-10-21 22:48 GMT+02:00 Thomas Morley <address@hidden>:
> 2016-10-21 22:39 GMT+02:00 Karol Majewski <address@hidden>:
>> 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