X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fclip-region.scm;h=c8eb537b255116872103570a271eb8172d7ef32b;hb=90875da23e480d263aecd479d5454b816d47dd8b;hp=eaf473058af7371ed6c0aabbe40ae9cfb0e0841e;hpb=c4b604cde47ac2f7fcc4cb4f57a6bc8b6b58efa9;p=lilypond.git

diff --git a/scm/clip-region.scm b/scm/clip-region.scm
index eaf473058a..c8eb537b25 100644
--- a/scm/clip-region.scm
+++ b/scm/clip-region.scm
@@ -50,13 +50,13 @@
 
 
 (define-public (rhythmic-location->file-string a)
-  (format "~a.~a.~a"
+  (ly:format "~a.~a.~a"
 	  (car a)
 	  (ly:moment-main-numerator (cdr a))
 	  (ly:moment-main-denominator (cdr a))))
 
 (define-public (rhythmic-location->string a)
-  (format "bar ~a ~a"
+  (ly:format "bar ~a ~a"
 	  (car a)
 	  (ly:moment->string  (cdr a))))