Doc: CSS: A better brown for the usage manual

[lilypond.git] / input / regression / arpeggio.ly

diff --git a/input/regression/arpeggio.ly b/input/regression/arpeggio.ly
index 4400577f9bbd5b9c92c12ce99ee25bb2e16a7c18..8b3076328b1420a32e2b9040782223718c3ab950 100644 (file)
--- a/input/regression/arpeggio.ly
+++ b/input/regression/arpeggio.ly
@@ -1,30 +1,28 @@
 
-\version "2.6.0"
+\version "2.17.6"
 \header{
-texidoc="
+  texidoc="
 Arpeggios are supported, both cross-staff and broken single staff.
 "
 }
 
+\layout { ragged-right= ##t }
 
 
-\score{
-    \context PianoStaff << 
-        \new Staff \relative c''{
-            <fis,  d a>\arpeggio
-           \override Staff.Arpeggio  #'arpeggio-direction = #1 
-            <fis d a >\arpeggio            
-            %%\override PianoStaff.SpanArpeggio  #'connect = ##t
-            \set PianoStaff.connectArpeggios = ##t
-            <fis d a>\arpeggio
-         }
-        \new Staff\relative c{
-            \clef bass
-            <g b d>\arpeggio
-           \override Staff.Arpeggio  #'arpeggio-direction = #-1
-            <g b d>\arpeggio
-            <g b d>\arpeggio
-        }
-    >>
-    \layout { raggedright= ##t }
-}
+\context PianoStaff << 
+  \new Staff \relative c''{
+    <fis,  d a>\arpeggio
+    \arpeggioArrowUp
+    <fis d a >\arpeggio            
+    %%\override PianoStaff.SpanArpeggio.connect = ##t
+    \set PianoStaff.connectArpeggios = ##t
+    <fis d a>\arpeggio
+  }
+  \new Staff\relative c{
+    \clef bass
+    <g b d>\arpeggio
+    \arpeggioArrowDown
+    <g b d>\arpeggio
+    <g b d>\arpeggio
+  }
+>>