X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fapply-context.ly;h=abcbd3028165077e2555452d23d8ce2ade465238;hb=627f9598585b3ced56e92b6c9aae22ec6c31adfa;hp=9024fbe8f460e819062819a09b4477e508ff6c36;hpb=169a91c8514e3dcea29d1aa01653a684fb60457d;p=lilypond.git

diff --git a/input/regression/apply-context.ly b/input/regression/apply-context.ly
index 9024fbe8f4..abcbd30281 100644
--- a/input/regression/apply-context.ly
+++ b/input/regression/apply-context.ly
@@ -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
 }