]> 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 9024fbe8f460e819062819a09b4477e508ff6c36..b83c906bd5c5626033ac65f1fb20a97622cb7cf3 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "2.10.0"
+\version "2.14.0"
 
 
 \header {
@@ -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
 }