2 texidoc="Manual hack for nested tuplets"
5 #(define (make-text-checker-once text)
6 (lambda (grob) (and text-checker-once
7 (if (equal? text (ly-get-grob-property grob 'text))
9 (set! text-checker-once #f) #t)
12 #(define text-checker-once #t)
17 \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter
19 \outputproperty #(make-text-checker-once "2:3")
20 #'extra-offset = #'(0 . 1)
30 \paper { linewidth = -1. }