Fix collision-dots-move.ly

Add all note heads of a meshing chord to dot column support.

diff --git a/lily/note-collision.cc b/lily/note-collision.cc
index 23e3f98e018dff05e6c8d662f7765114a7c34348..be69b231f242755adc20c5b6f285b0663d28b1f4 100644 (file)
--- a/lily/note-collision.cc
+++ b/lily/note-collision.cc
@@ -306,7 +306,12 @@ check_meshing_chords (Grob *me,
        far to the right.
       */
       if (Dot_column::has_interface (parent))
-       Side_position_interface::add_support (parent, nu);
+       {
+         Grob *stem = unsmob_grob (nu->get_object ("stem"));
+         extract_grob_set (stem, "note-heads", heads);
+         for (vsize i = 0; i < heads.size (); i++)
+           Side_position_interface::add_support (parent, heads[i]);
+       }
     }
 
   Direction d = UP;