lily/note-collision.cc: close holes in logic; issue 1792

[lilypond.git] / input / regression / collision-dots-move.ly

diff --git a/input/regression/collision-dots-move.ly b/input/regression/collision-dots-move.ly
index d04b0f7c9b9fabc26f59f88f001251cddcaab706..71fbdabb608fced5c564a9239365e0bd8134bff7 100644 (file)
--- a/input/regression/collision-dots-move.ly
+++ b/input/regression/collision-dots-move.ly
@@ -9,7 +9,17 @@ collision resolution moves the dots to the right."
 \layout { ragged-right = ##t }
 
 \relative c {
-  \key d \minor
   \clef bass
-  << <cis a' cis>4 \\ { g'8. bes16} >>
+  \override Staff.NoteCollision #'prefer-dotted-right = ##t
+  s1*0^"prefer-dotted-right = #t"
+  << <b g' >4 \\ { c8. d16 } >>
+  << <b g' >4 \\ { d8. d16 } >>
+  << <b g' >4 \\ { f'8. d16 } >>
+  << <c a' >4 \\ { g'8. d16 } >>
+  \override Staff.NoteCollision #'prefer-dotted-right = ##f
+  s1*0^"prefer-dotted-right = #f"
+  << <b g' >4 \\ { c8. d16 } >>
+  << <b g' >4 \\ { d8. d16 } >>
+  << <b g' >4 \\ { f'8. d16 } >>
+  << <c a' >4 \\ { g'8. d16 } >>
 }