* scm/framework-ps.scm (dump-stencil-as-EPS): fix thinkos.

[lilypond.git] / input / test / beam-count.ly

diff --git a/input/test/beam-count.ly b/input/test/beam-count.ly
index 1e5b7d01feded7ff4ba26d11ab52a8ef57166654..891c28300d3947d7d5beebcbe6317efdf2defc9f 100644 (file)
--- a/input/test/beam-count.ly
+++ b/input/test/beam-count.ly
@@ -1,27 +1,27 @@
-#(ly:set-option 'old-relative)
-\version "1.9.1"
+
+%%\version "2.7.39"
 \header{
        texidoc="@cindex Beam Count
 
-You can alter the number of stems in a beam.  Here we see
-two sets of four 32nds joined as if they were 8th notes.
+You can alter the number of stems in a beam.  In this example,
+two sets of four 32nds are joined, as if they were 8th notes.
 
 " }
 
-fragment = \notes {
-  \property Voice.autoBeamSettings
-    \set #'(end * * * *) = #(ly:make-moment 1 4)
-  f32 g a b b a g f
-
-  f32 g a b 
-  \property Voice.stemRightBeamCount = #1  b
-  \property Voice.stemLeftBeamCount = #1 a
-   g f
-}
+\layout { ragged-right = ##t}  
 
+\relative {
+  %% This has now (2.5.21) changed, (end * * * *) no longer
+  %% masks the default config entry ('(end * * 2 4) 1 4))
+  %% rather than masking by override:
+  %% #(override-auto-beam-setting '(end * * * *) 1 4)
+  %% revert the config file settings.
+  #(revert-auto-beam-setting '(end 1 32 4 4) 1 8)
+  #(revert-auto-beam-setting '(end 1 32 4 4) 3 8)
+  f32 g a b b a g f
 
-\score {
-  \notes\relative c \fragment
-  \paper { raggedright = ##t}  
+  f32 g a 
+  \set stemRightBeamCount = #1  b
+  \set stemLeftBeamCount = #1 b
+  a g f
 }
-