X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstencil-interpret.cc;h=25fad0d8429ef6c327ac2a08b57f959789015827;hb=f80e0f5e69fa8ffb35b6d3b7d162ed4191586c0c;hp=87e6496de778e2f3bfe3ed03fdfacd6a094ed47a;hpb=71fa1bbb755d3ba14eea93394af88fa4a1092222;p=lilypond.git diff --git a/lily/stencil-interpret.cc b/lily/stencil-interpret.cc index 87e6496de7..25fad0d842 100644 --- a/lily/stencil-interpret.cc +++ b/lily/stencil-interpret.cc @@ -78,13 +78,14 @@ interpret_stencil_expression (SCM expr, return; } - else if (scm_is_eq (head, ly_symbol2scm ("id"))) + else if (scm_is_eq (head, ly_symbol2scm ("output-attributes"))) { - SCM id = scm_cadr (expr); + SCM attributes = scm_cadr (expr); - (*func) (func_arg, scm_list_2 (ly_symbol2scm ("start-enclosing-id-node"), id)); + (*func) (func_arg, scm_list_2 (ly_symbol2scm ("start-group-node"), + ly_quote_scm (attributes))); interpret_stencil_expression (scm_caddr (expr), func, func_arg, o); - (*func) (func_arg, scm_list_1 (ly_symbol2scm ("end-enclosing-id-node"))); + (*func) (func_arg, scm_list_1 (ly_symbol2scm ("end-group-node"))); return; }