Imported Upstream version 2.12.3

[lilypond.git] / input / manual / pitches-headword.ly

diff --git a/input/manual/pitches-headword.ly b/input/manual/pitches-headword.ly
index 67e74f8a2bce6f5424dc5f2eeab2645f4a680328..d69c44a97f186cfe96dda4901d1983b172593769 100644 (file)
--- a/input/manual/pitches-headword.ly
+++ b/input/manual/pitches-headword.ly
@@ -1,5 +1,18 @@
-\version "2.11.38"
+\version "2.12.0"
 \include "english.ly"
+#(set-global-staff-size 15)
+\paper{
+  ragged-right=##t
+  line-width=17\cm
+  indent=0\cm
+}
+  
+\layout {
+  \context { \Score
+    \override PaperColumn #'keep-inside-line = ##t
+    \override NonMusicalPaperColumn #'keep-inside-line = ##t
+  }
+}
 
 % NR 1.1 Pitches
 
@@ -46,6 +59,7 @@
          |
          \clef treble
          <e' gs>4 %)
+         r4 r2
       }
 
       % RH Voice 2
@@ -76,6 +90,7 @@
          <a fs>2. )
          |
          s4
+         r4 r2
       }
 
    >>
@@ -83,18 +98,18 @@
    % LH Staff
    \new Staff {
       \override Staff.SustainPedalLineSpanner #'staff-padding = #5
-      <gs' e'>2 ( \sustainDown
-      <fs' ds' b>4 \sustainUp
+      <gs' e'>2 ( \sustainOn
+      <fs' ds' b>4 \sustainOff
       <e' cs'>4
       |
       <ds' bs gs>2
-      <cs' a>2 ) \sustainDown
+      <cs' a>2 ) \sustainOn
       |
       \clef bass
       \slurDown
-      <ds' b! a fs>2 ( \sustainUp
+      <ds' b! a fs>2 ( \sustainOff
       <e' b gs>4
-      <fs' cs' a>4 \sustainDown
+      <fs' cs' a>4 \sustainOn
       |
       \clef treble
       \voiceOne
@@ -105,7 +120,7 @@
          }
          \new Voice {
             \voiceTwo
-            b1 \sustainUp
+            b1 \sustainOff
          }
       >>
       \oneVoice
@@ -117,11 +132,12 @@
       <e cs>4
       |
       <ds bs, gs,>2
-      <cs a,>2 ) \sustainDown
+      <cs a,>2 ) \sustainOn
       |
-      <b,! b,,!>1 ( \sustainUp
+      <b,! b,,!>1 ( \sustainOff
       |
       <e e,>4 )
+      r4 r2
    }
 
 >>