ly- -> ly:

[lilypond.git] / input / test / duration-check.ly

diff --git a/input/test/duration-check.ly b/input/test/duration-check.ly
index 62a44d3eabc83c87a57d0d39021bc8536852cdf9..8c86a032e0e02c8399c0aef0a58847684a64ea5c 100644 (file)
--- a/input/test/duration-check.ly
+++ b/input/test/duration-check.ly
@@ -1,11 +1,11 @@
-\version "1.5.68"
+\version "1.7.3"
 #(define (duration-check music)
   "Check all rest durations in MUSIC"
 
-  (let* ((name (ly-music-name music))
-        (elts (ly-get-mus-property music 'elements))
-         (e (ly-get-mus-property music 'element))
-         (duration (ly-get-mus-property music 'duration)))
+  (let* ((name (ly:music-name music))
+        (elts (ly:get-mus-property music 'elements))
+         (e (ly:get-mus-property music 'element))
+         (duration (ly:get-mus-property music 'duration)))
 
     (if (not (equal? '() duration))
        (begin
@@ -26,7 +26,7 @@
     (if (pair? elts)
        (map duration-check elts))
     
-    (if (music? e)
+    (if (ly:music? e)
          (duration-check e)))
 
   music)