]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/beam-concave.ly
Regression test - make whiteout.ly reproducible
[lilypond.git] / input / regression / beam-concave.ly
index d47a9b1cbbdb18c3c414e81db8be52737992b2bc..8394f9a5d1bacbd6424478d7bc4a1e1fb8874a1f 100644 (file)
@@ -58,11 +58,7 @@ rossBeams = \relative c'' {
 
 #(define (<> x y) (not (= x  y)))
 \new Voice {
-  \override Beam #'positions = #(ly:make-simple-closure
-                                (ly:make-simple-closure
-                                 (append
-                                  (list chain-grob-member-functions `(,cons 0 0))
-                                  (check-slope-callbacks =))))
+  \override Beam #'positions = #(check-slope-callbacks =)
   \rossBeams
   
 }