diff options
author | Paul Morris <paulwmorris@gmail.com> | 2016-09-18 11:32:05 -0400 |
---|---|---|
committer | Paul Morris <paulwmorris@gmail.com> | 2016-10-04 11:07:04 -0400 |
commit | f80e0f5e69fa8ffb35b6d3b7d162ed4191586c0c (patch) | |
tree | c5e8aabcec6892a64f17c7b74b196afe869f04fd /lily/stencil-interpret.cc | |
parent | 71fa1bbb755d3ba14eea93394af88fa4a1092222 (diff) |
Issue 4974/1: Add output-attributes grob property
It is used for setting multiple attributes on <g>
nodes in SVG output, specified as an alist. The id
grob property is no longer used for this.
Diffstat (limited to 'lily/stencil-interpret.cc')
-rw-r--r-- | lily/stencil-interpret.cc | 9 |
1 files changed, 5 insertions, 4 deletions
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; } |