X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftweak-engraver.cc;h=81f86adea172681eeca5b52f0e93cda06328065a;hb=78f563e58de2de28fd17067fd434a42cb9f055a5;hp=da8f5375de4b2224e2c9df2906a5d7a7d80e745f;hpb=77d72a6b9e7e551dc4a3b365099f9fea339f9c72;p=lilypond.git

diff --git a/lily/tweak-engraver.cc b/lily/tweak-engraver.cc
index da8f5375de..81f86adea1 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 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
 */
 
 #include "engraver.hh"
 
-#include "music.hh"
 #include "grob.hh"
+#include "stream-event.hh"
 #include "translator.icc"
 
 class Tweak_engraver : public Engraver
@@ -28,21 +28,20 @@ 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 */ "");