* scripts/lilypond-book.py (do_file): do not overwrite input file.

[lilypond.git] / scm / clef.scm

diff --git a/scm/clef.scm b/scm/clef.scm
index d58fd237082e38e50f21b938fb4f30bea3187baa..fdece57e375c78af7b38b169c56ce440239ce3e3 100644 (file)
--- a/scm/clef.scm
+++ b/scm/clef.scm
@@ -96,7 +96,7 @@
         (m (make-music-by-name 'PropertySet))
         )
 
-      (map (lambda (x) (ly:set-mus-property! m (car x) (cdr x))) props)
+      (map (lambda (x) (ly:music-set-property! m (car x) (cdr x))) props)
       m
     ))
     
@@ -140,7 +140,7 @@
             (csp (make-music-by-name 'ContextSpeccedMusic))
             )
 
-         (ly:set-mus-property! seq 'elements musics)
+         (ly:music-set-property! seq 'elements musics)
          (context-spec-music seq 'Staff))
        (begin
          (ly:warn (format "Unknown clef type `~a'