X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbeam-concave.ly;h=6643e38cef9c314ef979e19539f27999a6479b75;hb=32a34dcef0c0041c6d62677487a380b5c8b85712;hp=093f30d918dd1819072b10ff8be7997fb69b2d3c;hpb=079be3c9a14d13e594cb1c1924058322a93ca1b5;p=lilypond.git diff --git a/input/regression/beam-concave.ly b/input/regression/beam-concave.ly index 093f30d918..6643e38cef 100644 --- a/input/regression/beam-concave.ly +++ b/input/regression/beam-concave.ly @@ -1,4 +1,4 @@ -\version "2.12.0" +\version "2.16.0" \header{ texidoc = "Fully concave beams should be horizontal. Informally spoken, @@ -6,7 +6,7 @@ beam. If an up-beam has high notes on its center stems, then we call it concave. - If a beam is fails a test, the desired slope is printed next to it. + If a beam fails a test, the desired slope is printed next to it. " } @@ -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 }