I like that! I would add
\once \override DynamicText.X-offset = #'1
looks nicer to my eyes
afterDynamic =
#(define-music-function
(parser location mus dyn)
(ly:music? ly:music?)
#{
\afterGrace
$mus
{ \once \override DynamicText.X-offset = #'1 s4 $dyn }
#})
mus = {
c'1
\afterDynamic { c'1\p-\tweak minimum-length 6 \< } \f
c'1
}
\score {
\mus
}
Stephen
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
