* lily/page.cc (Page): Do not use ly_scheme_function for

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

diff --git a/input/test/vertical-extent.ly b/input/test/vertical-extent.ly
index 336ae0d8f5600d5bced6ba20b702a97b25b8cab1..c5a289f3caac4f942d0c3e7de8c73c44da2b5903 100644 (file)
--- a/input/test/vertical-extent.ly
+++ b/input/test/vertical-extent.ly
@@ -1,26 +1,25 @@
-\version "1.7.18"
+\version "2.2.0"
 % TODO: huh?  what's this file about?  -gp
 
 \header { texidoc = "
-Vertical extents may be overriden by
-minimumVerticalExtent, extraVerticalExtent, and  verticalExtent. These are
-normal property values, and are written into the grob when the
-associated context finishes, so using it in \property works.
+Vertical extents may increased by setting @code{minimumVerticalExtent}, 
+@code{extraVerticalExtent}, and @code{verticalExtent}. In this example,
+@code{verticalExtent} is increased.
 " }
 
 \score {
-  \notes  <
-    \context Staff = upper {
-      \property Staff.verticalExtent = #'(-15.0 . 0.0)
+  \notes  <<
+    \new Staff {
+      \set Staff.verticalExtent = #'(-15.0 . 0.0)
       \clef alto
       c1
     }
-    \context Staff = lower {
-      \property Staff.verticalExtent = #'(-0.0 . 15.0)
+    \new Staff {
+      \set Staff.verticalExtent = #'(-0.0 . 15.0)
       \clef alto
       g1
     }
-  >
+  >>
   \paper{
       raggedright = ##t
   }