X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Foutput-property-engraver.cc;h=ccef5051f111403bc87cd5f9bf77ca23f403ff60;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=b1956910b6bfb7daa3f4fec11dd999ca52f03539;hpb=dbaf1e56e37be0e204231c5bf1adcb14bd8ac3b8;p=lilypond.git diff --git a/lily/output-property-engraver.cc b/lily/output-property-engraver.cc index b1956910b6..ccef5051f1 100644 --- a/lily/output-property-engraver.cc +++ b/lily/output-property-engraver.cc @@ -31,21 +31,18 @@ class Output_property_engraver : public Engraver protected: vector props_; - DECLARE_ACKNOWLEDGER (grob); - DECLARE_TRANSLATOR_LISTENER (apply_output); + void acknowledge_grob (Grob_info); + void listen_apply_output (Stream_event *); void stop_translation_timestep (); }; +// We only run this in the Score context, so all events are likely to +// find a target void Output_property_engraver::listen_apply_output (Stream_event *ev) { - /* - UGH. Only swallow the output property event in the context - it was intended for. This is inelegant but not inefficient. - */ - if (context ()->is_alias (ev->get_property ("context-type"))) - props_.push_back (ev); + props_.push_back (ev); } void @@ -59,11 +56,16 @@ Output_property_engraver::acknowledge_grob (Grob_info inf) if (scm_is_symbol (grob) && ly_symbol2string (grob) != inf.grob ()->name ()) continue; + SCM typ = o->get_property ("context-type"); SCM proc = o->get_property ("procedure"); - scm_call_3 (proc, - inf.grob ()->self_scm (), - d->self_scm (), - context ()->self_scm ()); + for (Context *c = d; c; c = c->get_parent_context ()) + { + if (c->is_alias (typ)) + scm_call_3 (proc, + inf.grob ()->self_scm (), + d->self_scm (), + c->self_scm ()); + } } } @@ -73,7 +75,8 @@ Output_property_engraver::stop_translation_timestep () props_.clear (); } -Output_property_engraver::Output_property_engraver () +Output_property_engraver::Output_property_engraver (Context *c) + : Engraver (c) { }