]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/apply-context.ly
Merge branch 'lilypond/translation' of ssh://jomand@git.sv.gnu.org/srv/git/lilypond
[lilypond.git] / input / regression / apply-context.ly
index 9024fbe8f460e819062819a09b4477e508ff6c36..c5c3ac7f474bf79e40d4f759438ae253d98dd45e 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "2.10.0"
+\version "2.11.51"
 
 
 \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
 }