]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/arpeggio-collision.ly
Run scripts/auxiliar/update-with-convert-ly.sh
[lilypond.git] / input / regression / arpeggio-collision.ly
index 80541e533d7f8530741b065e4990893e02e62dc0..4f4a22f4b42ca3c0bbcab44e4a37945d87ffb521 100644 (file)
@@ -1,51 +1,20 @@
-\version "1.7.16"
+\version "2.16.0"
 
 \header  {
-texidoc = "arpeggio stays clear of accidentals and flipped note heads.
-Since Arpeggio engraver is Voice, it does nothing for voice collisions."
+texidoc = "Arpeggio stays clear of accidentals and flipped note heads."
+}
+\layout {
+  ragged-right = ##t
+  \context{
+    \Staff
+    connectArpeggios = ##t
+  }
 }
 
-hairyChord = \context Staff \notes\relative c' <
-    \context Voice=one {
-        \property Voice.Stem \override #'direction = #1
-        \property Voice.NoteColumn \override #'horizontal-shift = #0
-        e4-\arpeggio
-    }
-    
-    \context Voice=two {
-        \property Voice.Stem \override #'direction = #1
-        \property Voice.NoteColumn \override #'horizontal-shift = #1
-        cis-\arpeggio
-        }
-    
-    \context Voice=three {
-       \property Voice.Stem \override #'direction = #1
-       \property Voice.NoteColumn \override #'horizontal-shift = #2
-       ais-\arpeggio
-       }
-    
-    \context Voice=four {
-       \property Voice.Stem \override #'direction = #-1
-       \property Voice.NoteColumn \override #'horizontal-shift = #-1
-       fis-\arpeggio
-       }
->
 
 
-\score{
-    \notes \transpose c c' {
-       << fis'' g  d a >>-\arpeggio
-       << fis, g  d a >>-\arpeggio
-       << fis'' g  d a >>-\arpeggio
-        \hairyChord
-       }
-    \paper {
-        raggedright = ##t
-       \translator{
-           \StaffContext
-           connectArpeggios = ##t
-       }
-       }
+\transpose c c' {
+  <fis'' g d a>\arpeggio
+  <fis, g d a>\arpeggio
+  <fis'' g d a>\arpeggio
 }
-
-%% new-chords-done %%