]> git.donarmstrong.com Git - lilypond.git/commitdiff
lilypond-1.3.103
authorfred <fred>
Tue, 26 Mar 2002 23:57:35 +0000 (23:57 +0000)
committerfred <fred>
Tue, 26 Mar 2002 23:57:35 +0000 (23:57 +0000)
lily/music-sequence.cc

index 2e5243f6b5915d09a71f95aba34f94511d16d051..d8089ad74de78e8a66318407c5de93d810ff0293 100644 (file)
@@ -14,7 +14,7 @@
 void
 Music_sequence::truncate (int k)
 {
-  SCM l = get_mus_property ("list");
+  SCM l = get_mus_property ("elements");
   if (k == 0)
     {
       l = SCM_EOL;
@@ -31,13 +31,13 @@ Music_sequence::truncate (int k)
          gh_set_cdr_x (s, SCM_EOL);
        }
     }
-  set_mus_property ("list", l);
+  set_mus_property ("elements", l);
 }
 
 SCM
 Music_sequence::music_list ()const
 {
-  return get_mus_property ("list");
+  return get_mus_property ("elements");
 }
 
 /*
@@ -46,14 +46,14 @@ Music_sequence::music_list ()const
 void
 Music_sequence::append_music (Music *m)
 {
-  set_mus_property ("list",
+  set_mus_property ("elements",
                    gh_append2( music_list(), gh_cons (m->self_scm (), SCM_EOL)));
   scm_unprotect_object (m->self_scm ());
 }
 
 Music_sequence::Music_sequence(SCM h)
 {
-  set_mus_property ("list", h);
+  set_mus_property ("elements", h);
 }
 
 void