Fix #362 (2)

[lilypond.git] / input / test / vertical-extent.ly

diff --git a/input/test/vertical-extent.ly b/input/test/vertical-extent.ly
index 60a88ab1e521c1fbe26bf877b494b3b512df261b..b46f3ac123db60b2faaabad89941c3b7277cb3fd 100644 (file)
--- a/input/test/vertical-extent.ly
+++ b/input/test/vertical-extent.ly
@@ -1,27 +1,37 @@
-\version "2.3.4"
+\version "2.10.0"
 % TODO: huh?  what's this file about?  -gp
+% This file shows that Staff grobs can get very deep or high; there is a lot
+% of room between the staves. 
 
 \header { texidoc = "
-Vertical extents may increased by setting @code{minimumVerticalExtent}, 
-@code{extraVerticalExtent}, and @code{verticalExtent}. In this example,
-@code{verticalExtent} is increased.
+Vertical extents may increased by setting @code{\override VerticalAxisGroup #'minimum-Y-extent}, 
+@code{extra-Y-extent}, and @code{Y-extent}. In this example,
+@code{Y-extent} is increased.
 " }
 
 \score {
     <<
     \new Staff {
-      \set Staff.verticalExtent = #'(-15.0 . 0.0)
+      \override Staff.VerticalAxisGroup #'Y-extent = #'(-15.0 . 0.0)
+      \clef alto
+      a1^"15-deep staff"
+    }
+    \new Staff {
+      \clef alto
+      b1
+    }
+    \new Staff {
       \clef alto
       c1
     }
     \new Staff {
-      \set Staff.verticalExtent = #'(-0.0 . 15.0)
       \clef alto
-      g1
+      \override Staff.VerticalAxisGroup #'Y-extent = #'(-0.0 . 10.0)
+      d1^"10-high staff"
     }
   >>
-  \paper{
-      raggedright = ##t
+  \layout{
+      ragged-right = ##t
   }
 }