X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fcollision-dots-move.ly;h=71fbdabb608fced5c564a9239365e0bd8134bff7;hb=19520fd5bbd221ca1d35011d7710e233c92a44b0;hp=e09d56be95ee2ec80d34856a8d73f19e7ba422a7;hpb=641486a1a5522a9e66b470d8c762a1f789219573;p=lilypond.git

diff --git a/input/regression/collision-dots-move.ly b/input/regression/collision-dots-move.ly
index e09d56be95..71fbdabb60 100644
--- a/input/regression/collision-dots-move.ly
+++ b/input/regression/collision-dots-move.ly
@@ -1,17 +1,25 @@
-\version "2.4.0"
+\version "2.14.0"
 \header {
     
-    texidoc = "If collision resolution finds dotted note head must
-	remain on left hand side, move dots to the right."
+    texidoc = "If dotted note heads must remain on the left side,  
+collision resolution moves the dots to the right."
 
 }
 
-\layout { raggedright = ##t }
+\layout { ragged-right = ##t }
 
-\score {
-   \relative c {
-    \key d \minor
-    \clef bass
-    << <cis a' cis>4 \\ { g'8. bes16} >>
-  }
+\relative c {
+  \clef bass
+  \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 } >>
 }