CVSROOT:        /cvsroot/lilypond
Module name:    lilypond
Branch:         
Changes by:     Han-Wen Nienhuys <[EMAIL PROTECTED]>    05/05/03 12:26:45

Modified files:
        lily           : context-def.cc 

Log message:
        (get_default_child): new function.
        (get_accepted): place default child in front of list.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/context-def.cc.diff?tr1=1.37&tr2=1.38&r1=text&r2=text

Patches:
Index: lilypond/lily/context-def.cc
diff -u lilypond/lily/context-def.cc:1.37 lilypond/lily/context-def.cc:1.38
--- lilypond/lily/context-def.cc:1.37   Tue May  3 12:13:28 2005
+++ lilypond/lily/context-def.cc        Tue May  3 12:26:45 2005
@@ -112,7 +112,7 @@
 
   if (ly_symbol2scm ("default-child") == tag)
     {
-      default_child_ = scm_cadr (mod);
+      default_child_ = sym;
     }
   else if (ly_symbol2scm ("consists") == tag
       || ly_symbol2scm ("consists-end") == tag


_______________________________________________
Lilypond-cvs mailing list
Lilypond-cvs@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-cvs

Reply via email to