* scripts/lilypond-book.py (do_file): do not overwrite input file.

[lilypond.git] / input / regression / beam-center-slope.ly

diff --git a/input/regression/beam-center-slope.ly b/input/regression/beam-center-slope.ly
index 14c850951b708bea5c76ad2e7cb65f37b8a4f1c9..af68a331600bbf9369d965ad0fe1946d610bb440 100644 (file)
--- a/input/regression/beam-center-slope.ly
+++ b/input/regression/beam-center-slope.ly
@@ -1,41 +1,42 @@
 
-\version "1.7.16"
+
+\version "2.1.26"
 \header{
 
-    texidoc="Simple beams on middle staffline be allowed to be
-    slightly sloped.  Beams reaching beyond middle line can have
-    bigger slope."
+    texidoc="Simple beams on middle staffline are allowed to be
+    slightly sloped, even if the notes have ledgers.  Beams reaching
+    beyond middle line can have bigger slope."
 
 }
 
 \score{
     \notes\relative c'{
-       %%\property Staff.Stem \set #'beamed-lengths = #'(3.50)
-       %%  c8-[ d]
-       %%  d-[ c]
+       %%\override Staff.Stem  #'beamed-lengths = #'(3.50)
+       %%  c8[ d]
+       %%  d[ c]
        %% r2
-       %% \property Staff.Stem \set #'beamed-lengths = #'(3.26)
+       %% \override Staff.Stem  #'beamed-lengths = #'(3.26)
 
-         a8-[^"small slope" b]
-         b-[ a]
+         a8[^"small slope" b]
+         b[ a]
 
-        c''-[ b]
-        b-[ c]
+        c''[ b]
+        b[ c]
        
-        c,,-[ d]
-        d-[ c]
+        c,,[ d]
+        d[ c]
        
-        a''-[ g]
-        g-[ a]
+        a''[ g]
+        g[ a]
 
-        c,,-[^"bigger slope" e]
-        e-[ c]
+        c,,[^"bigger slope" e]
+        e[ c]
        
-        a''-[ f]
-        f-[ a]
+        a''[ f]
+        f[ a]
     }
     \paper{
-       linewidth = 0.0
+       raggedright = ##t
     }
 }
-%% new-chords-done %%
+