X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fmusic-function.ly;h=c571b2f3ab3d7b298a22e53929764597aa46f366;hb=a9fa9784c0b21fe7de2738befc0a3bcc5f89ee4f;hp=680a9162eabe9913f151c2f35fff9f0e82828c0b;hpb=d02446a61d3eabfde67ed48928ae07766c97750f;p=lilypond.git

diff --git a/input/regression/music-function.ly b/input/regression/music-function.ly
index 680a9162ea..c571b2f3ab 100644
--- a/input/regression/music-function.ly
+++ b/input/regression/music-function.ly
@@ -1,15 +1,15 @@
 \header
 {
-    
-texidoc = "Music function are generic music transformation functions,
+
+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.7.32"
+\version "2.19.22"
 
-myBar = #(def-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 = #(def-music-function (parser location bar-type) (string?)
 \layout { ragged-right = ##t }
 
 {
-    d4 \myBar #"|:" d4
+    d4 \myBar ".|:" d4
 }