From efb31db9ee31a5e454ec5e421491742ae0e1f2fe Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Tue, 3 May 2005 12:26:45 +0000 Subject: [PATCH] (get_default_child): new function. (get_accepted): place default child in front of list. --- lily/context-def.cc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lily/context-def.cc b/lily/context-def.cc index cf01d38dcd..a17eb49954 100644 --- a/lily/context-def.cc +++ b/lily/context-def.cc @@ -112,7 +112,7 @@ Context_def::add_context_mod (SCM mod) 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 -- 2.39.2