]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/collision-dots-move.ly
Run scripts/auxiliar/update-with-convert-ly.sh
[lilypond.git] / input / regression / collision-dots-move.ly
index 31ca437497eea41863ab647baa53e0a916469112..801e404063e3bdbadc0c5c64901f6196f33fba3b 100644 (file)
@@ -1,16 +1,23 @@
+\version "2.16.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."
 
 }
 
-\paper { raggedright = ##t }
+\layout { ragged-right = ##t }
 
-\score {
-  \notes \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
+  << <b g' >4 ^"prefer-dotted-right = #t" \\ { 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
+  << <b g' >4 ^"prefer-dotted-right = #f" \\ { c8. d16 } >>
+  << <b g' >4 \\ { d8. d16 } >>
+  << <b g' >4 \\ { f'8. d16 } >>
+  << <c a' >4 \\ { g'8. d16 } >>
 }