]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/new/dynamics-text-spanner-postfix.ly
LSR: Update.
[lilypond.git] / Documentation / snippets / new / dynamics-text-spanner-postfix.ly
index 8f6a852833bc1724fcd8abd5147850512d3c15cb..2641209779a19cd8613e5e3339c5968a003af762 100644 (file)
@@ -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 |