X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ftuplet-nest.ly;h=8c10cdcd1b695976121f7d35bb1d7a49ab55b8e9;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=ee45781503a56ccebd5473989c3cb0377268c99f;hpb=d12d721e46d077c3e9557567f84c0eb401fc277a;p=lilypond.git

diff --git a/input/regression/tuplet-nest.ly b/input/regression/tuplet-nest.ly
index ee45781503..8c10cdcd1b 100644
--- a/input/regression/tuplet-nest.ly
+++ b/input/regression/tuplet-nest.ly
@@ -1,34 +1,49 @@
 
-\version "2.1.25"
+\version "2.19.21"
+
 \header {
-  texidoc="By a manual hack for nested tuplets, an outer tuplet can be moved up."
+    texidoc=" Tuplets may be nested."
+}
+
+\paper {
+  ragged-right = ##t  
+  indent = 0.0
 }
 
-#(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))))
-
-#(define text-checker-once #t)
-
-\score {
-  \notes\relative c'' {
-
-    \set tupletNumberFormatFunction = #fraction-tuplet-formatter
-
-    \applyoutput #(outputproperty-compatibility (make-text-checker-once "2:3")
-		   'extra-offset '(0 . 1.5))
-    \times 2/3 {
-      \times 2/3 {
-        a a a
-      }
-      \times 3/5 {
-        a a a a a
-      }
+\relative {
+  \tuplet 3/4 {
+    \tuplet 3/2 { c''8[ c c] }
+    \tuplet 3/2 { c8[ c c] }
+    \tuplet 3/2 { c8[ c c] }
+  }
+
+  \tuplet 3/4 {
+    \tuplet 3/2 { a8[ a a] }
+    \tuplet 3/2 { a8[ a a] }
+    \tuplet 3/2 { a8[ a a] }
+  }
+
+  \override TupletNumber.text = #tuplet-number::calc-fraction-text
+  \tuplet 6/4 {
+    \tuplet 3/2 {
+      a4 a a
+    }
+    \tuplet 5/3 {
+      a4 a a a a
+    }
+  }
+
+  s1*1/6
+  
+  \stemUp
+  \tuplet 6/4 {
+    \tuplet 3/2 {
+      a1*1/6 a f'
+    }
+    \tuplet 5/3 {
+      c f g a b 
     }
   }
-  \paper { raggedright = ##t}
+  
 }