summaryrefslogtreecommitdiff
path: root/lily/stencil-interpret.cc
diff options
context:
space:
mode:
authorPaul Morris <paulwmorris@gmail.com>2016-09-18 11:32:05 -0400
committerPaul Morris <paulwmorris@gmail.com>2016-10-04 11:07:04 -0400
commitf80e0f5e69fa8ffb35b6d3b7d162ed4191586c0c (patch)
treec5e8aabcec6892a64f17c7b74b196afe869f04fd /lily/stencil-interpret.cc
parent71fa1bbb755d3ba14eea93394af88fa4a1092222 (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.cc9
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;
}