]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/clip-region.scm
[config] Use fc-list.
[lilypond.git] / scm / clip-region.scm
index eaf473058af7371ed6c0aabbe40ae9cfb0e0841e..c8eb537b255116872103570a271eb8172d7ef32b 100644 (file)
 
 
 (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))))