X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftweak-engraver.cc;h=1879697bc34a7b5e51d0e852563ede377ac3a3ed;hb=26223457423318073a5dd9d5112c3ae9e3d8b4d9;hp=9843dce725513eb5ada5b86085cbd941f73a0250;hpb=75eebcb49e52d296b1da3e1074e0825d2c780db4;p=lilypond.git diff --git a/lily/tweak-engraver.cc b/lily/tweak-engraver.cc index 9843dce725..1879697bc3 100644 --- a/lily/tweak-engraver.cc +++ b/lily/tweak-engraver.cc @@ -3,14 +3,14 @@ source file of the GNU LilyPond music typesetter - (c) 2005--2006 Han-Wen Nienhuys + (c) 2005--2007 Han-Wen Nienhuys */ #include "engraver.hh" -#include "music.hh" #include "grob.hh" +#include "stream-event.hh" #include "translator.icc" class Tweak_engraver : public Engraver @@ -21,28 +21,35 @@ protected: DECLARE_ACKNOWLEDGER (grob); }; -Tweak_engraver::Tweak_engraver() +Tweak_engraver::Tweak_engraver () { } void Tweak_engraver::acknowledge_grob (Grob_info info) { - if (Music *music = info.music_cause ()) + if (Stream_event *ev = info.event_cause ()) { - for (SCM s = music->get_property ("tweaks"); + for (SCM s = ev->get_property ("tweaks"); scm_is_pair (s); s = scm_cdr (s)) { - info.grob ()->internal_set_property (scm_caar (s), scm_cdar (s)); + info.grob ()->set_property (scm_caar (s), scm_cdar (s)); } } } ADD_ACKNOWLEDGER (Tweak_engraver, grob); ADD_TRANSLATOR (Tweak_engraver, - /* doc */ "Read the @code{tweaks} property from the originating Music event, and set properties." , + /* doc */ + "Read the @code{tweaks} property from the originating event," + " and set properties.", - /* create */ "", - /* accept */ "", - /* read */ "", - /* write */ ""); + /* create */ + "", + + /* read */ + "", + + /* write */ + "" + );