On 22-4-2018 19:33, Helge Kruse wrote:
Glad to here that's working for you. Unfortunately this doesn't work for
me. I reordered the lines a bit because I think that the override
changes the line-width property of wordwrap-string. But the reordering
doesn't change the ouput. The text crosses several measures in this
example. I thought that \with-dimensions defines the extend of the
markup. But this doesn't affect the measure width.
Regards
Helge
%%BEGIN
\version "2.19.65"
narrator=#(define-music-function (dim text) (number? string?)
#{
s1^\markup
\with-dimensions #(cons 0 (+ dim 2)) #'(0 . 0)
\whiteout
\translate #'(0 . -1.5)
\override #(cons (quote line-width) dim )
\wordwrap-string #text
#})
{
\new PianoStaff <<
\new Staff {
s1
\narrator 30 "The brown fox jumps quickly over the lazy dog."
s1 s
}
\new Staff { s1 s s s }
>>
}
%%END
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
Add " \once\override TextScript.extra-spacing-width = #'(0 . 0)" to the
function. Then it works. Don't know why...
narrator=#(define-music-function
(dim text) (number? string?)
#{
\once\override TextScript.extra-spacing-width = #'(0 . 0)
s1^\markup
\with-dimensions #(cons 0 (+ dim 2)) #'(0 . 0)
\whiteout
\translate #'(0 . -1.5)
\override #(cons (quote line-width) dim)
\wordwrap-string #text
#})
Regards,
Auke
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
