]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/apply-context.ly
Imported Upstream version 2.14.2
[lilypond.git] / input / regression / apply-context.ly
index e8bf2e1f16e848fd33df0d4a0eb509cbdb985123..b83c906bd5c5626033ac65f1fb20a97622cb7cf3 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "2.7.13"
+\version "2.14.0"
 
 
 \header {
@@ -14,7 +14,7 @@ This example prints a bar-number during processing on stdout.
 
 }
 
-\layout { raggedright= ##t }
+\layout { ragged-right= ##t }
 
 
 \relative c'' {
@@ -24,7 +24,7 @@ This example prints a bar-number during processing on stdout.
   
   \applyContext
   #(lambda (tr)
-    (format #t "\nWe were called in barnumber ~a.\n"
+    (ly:progress "\nWe were called in bar number ~a.\n"
      (ly:context-property tr 'currentBarNumber)))
   c1 c1
 }