X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbeam-extreme.ly;h=49c78e8352f30b27b15c1223edde35840e52f567;hb=8d36de6e924066f07aa043bea971806c771b2786;hp=e7809791e0dd5b3419e536f5cd646be5d835ca67;hpb=70048d99398924e7ca0eb481925145ec243700c5;p=lilypond.git

diff --git a/input/regression/beam-extreme.ly b/input/regression/beam-extreme.ly
index e7809791e0..49c78e8352 100644
--- a/input/regression/beam-extreme.ly
+++ b/input/regression/beam-extreme.ly
@@ -1,48 +1,40 @@
 
-\version "1.9.4"
+\version "2.10.0"
 \header{
 texidoc="
 Beams should behave reasonably well, even under extreme circumstances.
 Stems may be short, but noteheads should never touch the beam.  Note that
-under normal circumstances, these beams would get knees here
-Beam.auto-knee-gap was set to false.
+under normal circumstances, these beams would get knees.  Here
+@code{Beam.auto-knee-gap} was set to false.
 "
 }
 
-extreme = \notes\relative c'' {
-  \stemBoth
+\layout{
+  %%    ragged-right = ##t
+  ragged-right = ##t
+}
+
+extreme = \relative c'' {
+  \stemNeutral
    g8[ c c,]
    c16[ c'' a f]
   \stemUp 
    c,,32[ c'' a f]
 
   %%%%%%%
-  \stemBoth
+  \stemNeutral
   \times 2/3{ d16[ fis' d,]} \times 2/3{ cis[ g'' cis,,]}
   a'16 cis a, g''' % Used to give a nice beam directed upwards.
-  \stemBoth
+  \stemNeutral
 
   \transpose c c {
 	  \stemDown  e'8[ e e']
       }
 }
 
-\score {
-  {
-    % If we want to test extreme beams,
-    % we should not have them auto-kneed
-    \property Voice.Beam \override #'auto-knee-gap = ##f
-    \extreme
-
-
-    %% what does this test? --hwn
-%{
-    \property Voice.Beam \override #'slope-limit = #1000
-    \extreme
-    %}
-  }
-  \paper{
-%    raggedright = ##t
-    raggedright = ##t
-  }
+{
+				% If we want to test extreme beams,
+				% we should not have them auto-kneed
+  \override Beam  #'auto-knee-gap = ##f
+  \extreme
 }