]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/apply-context.ly
Merge with master
[lilypond.git] / input / regression / apply-context.ly
index af397c66a419b4eb3b3e80f3402120bfb0451cfb..abcbd3028165077e2555452d23d8ce2ade465238 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "2.7.39"
+\version "2.10.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
 }