]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/arpeggio-collision.ly
Merge commit 'origin/dev/jneeman' into systems-per-page
[lilypond.git] / input / regression / arpeggio-collision.ly
index 82a4ff48dcfa30e986d7834f8fdbc75730304431..ba82ac1293d40f034d71303d316feea39d798edd 100644 (file)
@@ -1,48 +1,20 @@
+\version "2.12.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'' {
-        \context Voice < fis''-\arpeggio g  d a >
-        \context Voice < fis,-\arpeggio g  d a >
-        \context Voice < fis''-\arpeggio g  d a >
-        \hairyChord
-       }
-    \paper {
-        linewidth = -1.;
-       \translator{
-           \StaffContext
-           connectArpeggios = ##t
-       }
-       }
+\transpose c c' {
+  <fis'' g d a>\arpeggio
+  <fis, g d a>\arpeggio
+  <fis'' g d a>\arpeggio
 }