%%%%
\version "2.18.2"
{
\once \override DynamicText.after-line-breaking = #(lambda (grob)
(let* ((x-parent (ly:grob-parent grob X))
(orig-sten (ly:grob-property x-parent 'stencil)))
(ly:grob-set-property! x-parent 'stencil
(grob-interpret-markup x-parent #{
\markup \combine \stencil #orig-sten
\with-dimensions #'(0 . 0) #'(0 . 0) \vcenter
\with-color #red \draw-line #'(0 . 6) #}))))
c'\mf
}
%%%%
Thanks as always for your patience and your help.
How can I make it compile on 2.19 ?
It compiles on 2.18 but it gives me this error on 2.19:
var/task/ly/usr/share/lilypond/current/ly/init.ly:56:2: error: wrong type for argument 1. Expecting stencil, found (quote ())