2003 -> 2004

[lilypond.git] / lily / tie-performer.cc

diff --git a/lily/tie-performer.cc b/lily/tie-performer.cc
index 12ea01c52ee8517b8b2eb1c5ef09b5e5647fb650..5d16b88b01f070f7c85846b39189bcc139edeba8 100644 (file)
--- a/lily/tie-performer.cc
+++ b/lily/tie-performer.cc
@@ -3,11 +3,11 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 1999--2003 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c) 1999--2004 Jan Nieuwenhuizen <janneke@gnu.org>
   
  */
 
-
+#include "translator-group.hh"
 #include "audio-item.hh"
 #include "event.hh"
 #include "pqueue.hh"
@@ -52,6 +52,7 @@ private:
   Link_array<Audio_tie> ties_;
   
 protected:
+  virtual void process_music ();
   virtual void start_translation_timestep ();
   virtual void stop_translation_timestep ();
   virtual void acknowledge_audio_element (Audio_element_info);
@@ -59,6 +60,13 @@ protected:
   virtual void create_audio_elements ();
 };
 
+void
+Tie_performer::process_music ()
+{
+  if (event_)
+    daddy_trans_->set_property ("tieMelismaBusy", SCM_BOOL_T);
+}
+
 
 Tie_performer::Tie_performer ()
 {