(process_music): also set tieMelismaBusy if

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

diff --git a/lily/tie-engraver.cc b/lily/tie-engraver.cc
index f08e5e5d6c6faa952f668d446f7b154316cf468e..9547d14025ae9e81c08f5f6cf8dc3444168ea594 100644 (file)
--- a/lily/tie-engraver.cc
+++ b/lily/tie-engraver.cc
@@ -94,13 +94,13 @@ Tie_engraver::listen_tie (Stream_event *ev)
 void
 Tie_engraver::process_music ()
 {
-  for (vsize i = 0; i < heads_to_tie_.size (); i++)
-    if (heads_to_tie_[i].tie_event_
-       || heads_to_tie_[i].tie_stream_event_)
-      {
-       context ()->set_property ("tieMelismaBusy", SCM_BOOL_T);
-       break;
-      }
+  bool busy = event_;
+  for (vsize i = 0; !busy && i < heads_to_tie_.size (); i++)
+    busy |=  (heads_to_tie_[i].tie_event_
+             || heads_to_tie_[i].tie_stream_event_);
+
+  if (busy)
+    context ()->set_property ("tieMelismaBusy", SCM_BOOL_T);
 }
 
 void