X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=inline;f=lily%2Fstencil-interpret.cc;h=8214af5dcc8e40a427dcd80212a0931a74bcef6f;hb=9b2bf7690da13a01627dee91c4749fd98d3da212;hp=1d89e032ba2559051bc8d489fc339eacc7450df2;hpb=08560a1b8076630c4fc6cb9b902614d8b74fd6fc;p=lilypond.git diff --git a/lily/stencil-interpret.cc b/lily/stencil-interpret.cc index 1d89e032ba..8214af5dcc 100644 --- a/lily/stencil-interpret.cc +++ b/lily/stencil-interpret.cc @@ -72,6 +72,16 @@ interpret_stencil_expression (SCM expr, interpret_stencil_expression (scm_caddr (expr), func, func_arg, o); (*func) (func_arg, scm_list_1 (ly_symbol2scm ("resetcolor"))); + return; + } + else if (head == ly_symbol2scm ("id")) + { + SCM id = scm_cadr (expr); + + (*func) (func_arg, scm_list_2 (ly_symbol2scm ("start-enclosing-id-node"), id)); + interpret_stencil_expression (scm_caddr (expr), func, func_arg, o); + (*func) (func_arg, scm_list_1 (ly_symbol2scm ("end-enclosing-id-node"))); + return; } else if (head == ly_symbol2scm ("rotate-stencil"))