release: 1.3.80

[lilypond.git] / lily / melisma-engraver.cc

diff --git a/lily/melisma-engraver.cc b/lily/melisma-engraver.cc
index e5f7ada6033c15bd7cabd2033c7c63c27a531a38..e51baf0cfb1f790c0a409a8b439a50d4d27bc802 100644 (file)
--- a/lily/melisma-engraver.cc
+++ b/lily/melisma-engraver.cc
@@ -10,6 +10,7 @@
 #include "engraver.hh"
 #include "musical-request.hh"
 #include "score-element.hh"
+#include "translator-group.hh"
 
 /**
    Signal existence of melismas.
@@ -38,11 +39,10 @@ Melisma_engraver::do_try_music (Music *m )
          || (to_boolean (tie))
          || (to_boolean (beam))) {
 
-       Score_element * melisma_p = new Score_element (get_property ("basicMelismaProperties"));
-       announce_element (melisma_p, m);
-
+       daddy_trans_l_->set_property("melismaEngraverBusy",SCM_BOOL_T);
        return true;
       }
     }
+  daddy_trans_l_->set_property("melismaEngraverBusy",SCM_BOOL_F);
   return false;
 }