* input/test/slur-shape.ly (x): remove file.

[lilypond.git] / input / test / staff-size.ly

diff --git a/input/test/staff-size.ly b/input/test/staff-size.ly
index ca02169a75e4db24cb858dff3bee2e3ceea1763b..ffe5548d839e51785fc65a74008df4e743dfa10e 100644 (file)
--- a/input/test/staff-size.ly
+++ b/input/test/staff-size.ly
@@ -1,36 +1,38 @@
 #(ly:set-option 'old-relative)
-\version "1.9.8"
+\version "2.1.6"
 
 \header { texidoc = "@cindex Staff Size
 
 Setting staff sizes is a little clumsy.  There are two options: using
 @code{StaffContainer} and override/revert, or
-@code{\applyoutput}. Both methods are shown in this example. "
+@code{\applyoutput}. Both methods are shown in this example."
 
 }
 
 \score {
-  \notes \relative c' << \new StaffContainer {
-     \property StaffContainer.StaffSymbol \set #'staff-space = #(/ 16 20)
-
-       \property Staff.fontSize = #-1
-       \property Voice.fontSize = #-1
+  \notes \relative c' <<
+      \new StaffContainer {
+         \property StaffContainer.StaffSymbol \set #'staff-space = #(/ (* magstep magstep))
+         \property Staff.fontSize = #-2
        
-       \dynamicUp\stemDown
-
-       %\key gis \major
-       c8 d  e[ f g a] b c \ff
-  }
-
-\new Staff \relative c'' { \dynamicDown c,,4 \ff c c c  }
-\new Staff {
-  \context Staff \applyoutput #(outputproperty-compatibility (make-type-checker 'staff-symbol-interface) 'staff-space 0.8)
-  \property Staff.fontSize = #-1
-  \clef bass
-  c8 c c c  c c c c
-}
->>
-\paper { raggedright = ##t}
+         \dynamicUp\stemDown
+         
+                               %\key gis \major
+         c8 d  e[ f g a] b c \ff
+      }
+
+      \new Staff \relative c'' {
+         \dynamicDown c,,4 \ff c c c
+      }
+      \new Staff \with {
+         fontSize = #-1
+         StaffSymbol \set #'staff-space = #(/ magstep)
+      } {
+         \clef bass
+         c8 c c c  c c c c
+      }
+  >>
+  \paper { raggedright = ##t}
 }