From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 26 Mar 2007 02:28:23 +0000 (-0300)
Subject: Fix collision-dots-move.ly
X-Git-Tag: release/2.11.22-1~28^2~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f0ab068ce6238d0cfb99562ea8af310ad78f12b2;p=lilypond.git

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 23e3f98e01..be69b231f2 100644
--- 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;