7 texidoc=" Nested tuplets can be printed, using a manual hack to
8 move the outer bracket up."
12 #(define (make-text-checker-once text)
13 (lambda (grob) (and text-checker-once
14 (if (equal? text (ly:grob-property grob 'text))
16 (set! text-checker-once #f) #t)
19 #(define text-checker-once #t)
24 \set tupletNumberFormatFunction = #fraction-tuplet-formatter
26 \applyoutput #(lambda (gr org cur)
27 (if (equal? (ly:grob-property gr 'text) "6:4")
28 (set! (ly:grob-property gr 'extra-offset) '(0 . 1.5))))
38 \layout { raggedright = ##t}