X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fnew%2Fdynamics-text-spanner-postfix.ly;h=2641209779a19cd8613e5e3339c5968a003af762;hb=119e3affc66e887412f897f95f2f8cec292c2555;hp=8f6a852833bc1724fcd8abd5147850512d3c15cb;hpb=d8b02eb476e895b98fd59f1c5d975221806181b1;p=lilypond.git diff --git a/Documentation/snippets/new/dynamics-text-spanner-postfix.ly b/Documentation/snippets/new/dynamics-text-spanner-postfix.ly index 8f6a852833..2641209779 100644 --- a/Documentation/snippets/new/dynamics-text-spanner-postfix.ly +++ b/Documentation/snippets/new/dynamics-text-spanner-postfix.ly @@ -11,15 +11,27 @@ hairpins by default, \cresc etc. produce text spanners by default. } % Some sample text dynamic spanners, to be used as postfix operators -crpoco = #(make-music 'CrescendoEvent 'span-direction START - 'span-type 'text 'span-text "cresc. poco a poco") +crpoco = +#(make-music 'CrescendoEvent + 'span-direction START + 'span-type 'text + 'span-text "cresc. poco a poco") % Redefine the existing \cresc, \dim and \decresc commands to use postfix syntax -cresc = #(make-music 'CrescendoEvent 'span-direction START - 'span-type 'text 'span-text "cresc.") -dim = #(make-music 'DecrescendoEvent 'span-direction START - 'span-type 'text 'span-text "dim.") -decresc = #(make-music 'DecrescendoEvent 'span-direction START - 'span-type 'text 'span-text "decresc.") +cresc = +#(make-music 'CrescendoEvent + 'span-direction START + 'span-type 'text + 'span-text "cresc.") +dim = +#(make-music 'DecrescendoEvent + 'span-direction START + 'span-type 'text + 'span-text "dim.") +decresc = +#(make-music 'DecrescendoEvent + 'span-direction START + 'span-type 'text + 'span-text "decresc.") \relative c' { c4\cresc d4 e4 f4 |