X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fmusic-function.ly;h=c571b2f3ab3d7b298a22e53929764597aa46f366;hb=fd8e4f4ad347ef8f96c2e069be83f63f0f9da466;hp=5424dede7c3c1971ab6d52d8286778f407f97e39;hpb=6d910958ea621e4ab878a118bd77e61ae210a6ef;p=lilypond.git diff --git a/input/regression/music-function.ly b/input/regression/music-function.ly index 5424dede7c..c571b2f3ab 100644 --- a/input/regression/music-function.ly +++ b/input/regression/music-function.ly @@ -1,15 +1,15 @@ \header { - + texidoc = "Music functions are generic music transformation functions, which can be used to extend music syntax seamlessly. Here we -demonstrate a @code{\myBar} function, which works similar to -@code{\bar}, but is implemented completely in Scheme." +demonstrate a @code{\\myBar} function, which works similar to +@code{\\bar}, but is implemented completely in Scheme." } -\version "2.11.51" +\version "2.19.22" -myBar = #(define-music-function (parser location bar-type) (string?) +myBar = #(define-music-function (bar-type) (string?) (context-spec-music (context-spec-music (make-property-set 'whichBar bar-type) 'Timing) 'Score)) @@ -17,6 +17,6 @@ myBar = #(define-music-function (parser location bar-type) (string?) \layout { ragged-right = ##t } { - d4 \myBar "|:" d4 + d4 \myBar ".|:" d4 }