Changes the spanner-placement property of FootnoteSpanner to ly:dir
[lilypond/patrick.git] / input / regression / dynamics-custom-text-spanner-postfix.ly
blobf3f26b0cf24dd6405beedabbb1a70a7dd171b0c8
1 \version "2.13.4"
3 \header {
4 texidoc = "Postfix functions for custom crescendo text spanners. The spanners
5 should start on the first note of the measure. One has to use -\mycresc,
6 otherwise the spanner start will rather be assigned to the next note."
9 % Two functions for (de)crescendo spanners where you can explicitly give the
10 % spanner text.
11 mycresc = #(define-music-function (parser location mymarkup) (string?)
12 (make-music 'CrescendoEvent 'span-direction START
13 'span-type 'text 'span-text mymarkup))
14 mydecresc = #(define-music-function (parser location mymarkup) (string?)
15 (make-music 'DecrescendoEvent 'span-direction START
16 'span-type 'text 'span-text mymarkup))
18 \relative c' {
19 c4-\mycresc "custom cresc" c4 c4 c4 |
20 c4 c4 c4 c4 |
21 c4-\mydecresc "custom decresc" c4 c4 c4 |
22 c4 c4\! c4 c4