Doc: CSS: A better brown for the usage manual

[lilypond.git] / input / regression / pedal-ped.ly

diff --git a/input/regression/pedal-ped.ly b/input/regression/pedal-ped.ly
index 94d31bc196769b5ca4b0533890ac59bf30a72c9d..8c4c8d1a129d4425b0e19f70c39f98e42effb984 100644 (file)
--- a/input/regression/pedal-ped.ly
+++ b/input/regression/pedal-ped.ly
@@ -1,25 +1,21 @@
+\version "2.17.6"
 \header
 {
-    texidoc = "Piano pedals: the standard style is with Ped symbols.
-The string can be tuned. This example shows the shorter tilde/P variant
+  texidoc = "The standard piano pedals style comes with Ped symbols.
+The pedal string can be also tuned, for example, to a shorter tilde/P variant
 at the end of the melody."
 
 }
 
 
-\score{
-    \context Staff \notes\relative c'{
-
-        c4 d e f g
-        \sustainDown b c
-        c, d16[  c  c c]  e[ e \sustainUp \sustainDown e e ] f4 \sustainUp 
-        g\sustainDown  b \sustainUp c 
-        \property Staff.pedalSustainStrings = #'("-" "-P" "P")
-        \property Staff.SustainPedal \override #'padding = #-2
-        c, \sustainDown d e \sustainUp \sustainDown f
-        \sustainUp g b c
-
-
-
-    }
+\context Staff \relative c'{
+  c4 d e f g
+  \sustainOn b c
+  c, d16[  c  c c]  e[ e \sustainOff \sustainOn e e ] f4 \sustainOff 
+  g\sustainOn  b \sustainOff c 
+  \set Staff.pedalSustainStrings = #'("-" "-P" "P")
+  \override Staff.SustainPedal.padding = #-2
+  c, \sustainOn d e \sustainOff \sustainOn f
+  \sustainOff g b c
 }
+