Hello Karol,
please excuse this sidenote: It seems that your mailing client doesn’t
handle metadata correctly, so each reply of yours is technically
regarded as starting a new thread. It would be good if you could find a
way (or can someone help) to fix this. Not only may others have thread
view enabled in Thunderbird like I, but more importantly the archives
get messed up.
Best, Simon
On 26.10.2016 16:59, Karol Majewski wrote:
OK, I resign. But stil I don't get something in the code you posted yesterday:
%%%%%%%%%%%%%%%%%%%%%
raiseTie =
#(lambda (grob)
(let* ((ties (ly:grob-array->list (ly:grob-object grob 'ties)))
(notehead (ly:spanner-bound (car ties) LEFT))
(stem (ly:grob-object notehead 'stem))
(stem-dir (ly:grob-property stem 'direction))
(flag (ly:grob-object stem 'flag))
(dot (ly:grob-object notehead 'dot)))
(if (and (= stem-dir 1)(ly:grob? dot))
(for-each
(lambda (tie)
(let ((tie-dir (ly:grob-property tie 'direction)))
(if (= tie-dir 1)
(begin
(ly:grob-set-nested-property! tie '(details skyline-padding)
5)
(ly:grob-set-property! tie 'Y-offset -0.25)))))
ties))))
\layout {
\context {
\Score
\override TieColumn.before-line-breaking = #raiseTie
}
}
{
\time 3/8 \voiceOne
g'4~ g'8~
g'4~ g'8~
g'4.~
g'4~ g'8
}
%%%%%%%%%%%%%%%%%%%%%%%%%
Now, remove 'voiceOne' and a tie disappears. It seems that something is wrong
with (let ((tie-dir (ly:grob-property tie 'direction)))). Is it possible to fix
this?
Best
Karol
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
