X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fcompound-time.ly;h=a74b0baa8b94229ec85a632cc172631acbed73d3;hb=d43940750dbd5e3a8b5dd799b8c422acd8fb71ff;hp=0bf588441ab815e81a1e1c0bd0788b518956d3c7;hpb=a98b4affe11787c3e30b1e23dd363de64b940a80;p=lilypond.git

diff --git a/input/test/compound-time.ly b/input/test/compound-time.ly
index 0bf588441a..a74b0baa8b 100644
--- a/input/test/compound-time.ly
+++ b/input/test/compound-time.ly
@@ -1,5 +1,5 @@
 
-\version "2.5.20"
+\version "2.10.0"
 \header {
 texidoc = "@cindex compound time
 @cindex plus
@@ -10,22 +10,18 @@ compound time.
 "
 }
 
-\layout{raggedright = ##t}
+\layout{ragged-right = ##t}
+
+#(define (compound-time one two num)
+  (markup #:override '(baseline-skip . 0) #:number 
+   (#:line ((#:column (one num)) #:vcenter "+" (#:column (two num))))))
 
-#(define (compound-time grob one two num)
-  (interpret-markup
-   (ly:grob-layout grob)
-   '(((baseline-skip . 2)
-      (word-space . 2)
-      (font-family . number)))
-   (markup
-    #:line ( #:column (one num) #:lower 1 "+" #:column (two num)))))
 
 \relative {
   %% compound time signature hack
   \time 5/8
-  \override Staff.TimeSignature #'print-function
-  = #(lambda (grob) (compound-time grob "2" "3" "8"))
+  \override Staff.TimeSignature #'stencil = #ly:text-interface::print
+  \override Staff.TimeSignature #'text = #(compound-time "2" "3" "8" )
   #(override-auto-beam-setting '(end 1 8 5 8) 1 4)
   c8 c c8 c c
 }