X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ftuplet-nest.ly;h=dfdd543450bf13c3793e3b29671dd2213db49f61;hb=7770772b6101f60b28173fd68ceb701048016b21;hp=75e1478ecdb03e9aaf0995328f68ab2c76547a1b;hpb=8083c316e4cdb818e5ca3a00281ea8a4c575e80e;p=lilypond.git diff --git a/input/regression/tuplet-nest.ly b/input/regression/tuplet-nest.ly index 75e1478ecd..dfdd543450 100644 --- a/input/regression/tuplet-nest.ly +++ b/input/regression/tuplet-nest.ly @@ -1,33 +1,37 @@ -\version "1.7.18" -\header { - texidoc="Manual hack for nested tuplets, move outer tuplet up." -} -#(define (make-text-checker-once text) - (lambda (grob) (and text-checker-once - (if (equal? text (ly:get-grob-property grob 'text)) - (begin - (set! text-checker-once #f) #t) - #f)))) +\version "2.14.0" -#(define text-checker-once #t) +\header { + texidoc=" Tuplets may be nested." +} -\score { - \notes\relative c'' { +\paper { + ragged-right = ##t + indent = 0.0 +} - \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter +\relative c'' { + \override TupletNumber #'text = #tuplet-number::calc-fraction-text + \times 4/6 { + \times 2/3 { + a a a + } + \times 3/5 { + a a a a a + } + } - \outputproperty #(make-text-checker-once "2:3") - #'extra-offset = #'(0 . 1.5) + s1*1/6 + + \stemUp + \times 4/6 { \times 2/3 { - \times 2/3 { - a a a - } - \times 3/5 { - a a a a a - } + a1*1/6 a f' + } + \times 3/5 { + c f g a b } } - \paper { raggedright = ##t} + } -%% new-chords-done %% +