]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/tuplet-nest.ly
* scripts/convert-ly.py (conv): remove \notes.
[lilypond.git] / input / regression / tuplet-nest.ly
index 75e1478ecdb03e9aaf0995328f68ab2c76547a1b..74e884cf5b034ad229fe2a7cbb3963bdce3cd32b 100644 (file)
@@ -1,11 +1,17 @@
-\version "1.7.18"
+
+\version "2.3.4"
+
+
 \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))))
 #(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
       }
@@ -30,4 +37,4 @@
   }
   \paper { raggedright = ##t}
 }
-%% new-chords-done %%
+