X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ftuplet-nest.ly;h=51e62b3b0be16e0cede37a7c4ab3f8834d20585e;hb=a23264aee8cab5acaa94cdc103f2497c3f042543;hp=afed1d3db34536ad86f32682b7cc7199ad7374ce;hpb=2b4664417d36bed2b408d769e3dfd96732710d54;p=lilypond.git diff --git a/input/regression/tuplet-nest.ly b/input/regression/tuplet-nest.ly index afed1d3db3..51e62b3b0b 100644 --- a/input/regression/tuplet-nest.ly +++ b/input/regression/tuplet-nest.ly @@ -1,11 +1,17 @@ -\version "1.7.6" + +\version "2.3.22" + + \header { - texidoc="Manual hack for nested tuplets, move outer tuplet up." + + texidoc=" Nested tuplets can be printed, using a manual hack to + move the outer bracket up." + } #(define (make-text-checker-once text) (lambda (grob) (and text-checker-once - (if (equal? text (ly:get-grob-property grob 'text)) + (if (equal? text (ly:grob-property grob 'text)) (begin (set! text-checker-once #f) #t) #f)))) @@ -13,13 +19,14 @@ #(define text-checker-once #t) \score { - \notes\relative c'' { + \relative c'' { - \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter + \set tupletNumberFormatFunction = #fraction-tuplet-formatter - \outputproperty #(make-text-checker-once "2:3") - #'extra-offset = #'(0 . 1.5) - \times 2/3 { + \applyoutput #(lambda (gr org cur) + (if (equal? (ly:grob-property gr 'text) "6:4") + (set! (ly:grob-property gr 'extra-offset) '(0 . 1.5)))) + \times 4/6 { \times 2/3 { a a a } @@ -28,6 +35,6 @@ } } } - \paper { linewidth = -1. } + \layout { raggedright = ##t} } -%% new-chords-done %% +