* lily/note-collision.cc (check_meshing_chords): if merging heads,

[lilypond.git] / lily / note-collision.cc

diff --git a/lily/note-collision.cc b/lily/note-collision.cc
index ad06f67663a9c146a6ba9d14c7670fe35e61f422..5d9290904bffd7adb846e6a68c6875072f5e48e3 100644 (file)
--- a/lily/note-collision.cc
+++ b/lily/note-collision.cc
@@ -206,7 +206,16 @@ check_meshing_chords (Grob*me,
       if (wipe_ball && wipe_ball->live ())
        {
          wipe_ball->set_grob_property ("transparent", SCM_BOOL_T);
-         wipe_ball->set_grob_property ("molecule", SCM_EOL);     
+         wipe_ball->set_grob_property ("molecule", SCM_EOL);
+
+         if (Grob *d = unsmob_grob (wipe_ball->get_grob_property ("dot")))
+           d->suicide ();
+       }
+
+      if (wipe_ball == 0
+         && unsmob_grob (nd->get_grob_property ("dot")))
+       {
+         unsmob_grob (nd->get_grob_property ("dot"))->suicide ();
        }
     }
   else if (close_half_collide && !touch)