[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Tie settings question
From: |
Thomas Morley |
Subject: |
Re: Tie settings question |
Date: |
Fri, 21 Oct 2016 22:48:25 +0200 |
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
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
- Tie settings question, Karol Majewski, 2016/10/20
- Re: Tie settings question, Karol Majewski, 2016/10/21
- Re: Tie settings question,
Thomas Morley <=
- Re: Tie settings question, Karol Majewski, 2016/10/21
- Re: Tie settings question, Karol Majewski, 2016/10/22
- Re: Tie settings question, Karol Majewski, 2016/10/22
- Re: Tie settings question, Karol Majewski, 2016/10/24