X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fstem-cross-staff.ly;h=6c4dee3796297cdc99dd3e5592cd89a03feed40c;hb=80bb174de95ebb8a08e5bdfae0855c525b8e7736;hp=39c5d93f24bd5720083a1f2ab7b9806a2699d44b;hpb=e9bd265943d37689b1a6892217cb6f67bbe69f73;p=lilypond.git

diff --git a/input/test/stem-cross-staff.ly b/input/test/stem-cross-staff.ly
index 39c5d93f24..6c4dee3796 100644
--- a/input/test/stem-cross-staff.ly
+++ b/input/test/stem-cross-staff.ly
@@ -1,30 +1,30 @@
-\version "1.9.1"
+\version "2.1.30"
 
 \header { texidoc = "@cindex Stem Cross Staff
-There is no support for putting chords across staves.
-You can get this result by increasing the length of the stem in the
-lower stave so it reaches the stem in the upper stave, or vice versa. "
+The chords which exceptionally cross staves may be produced by increasing 
+the length of the stem in the lower stave, so it reaches the stem in the 
+upper stave, or vice versa. "
 }
 
-stemExtend = \once \property Voice.Stem \override #'length  = #22
+stemExtend = \once \override Stem  #'length = #22
 
 %% following reqs 1.7.1 or better.
-noFlag = \once \property Voice.Stem \override #'flag-style = #'no-flag
+noFlag = \once \override Stem  #'flag-style = #'no-flag
 
 
 \score { \notes 
     \context  PianoStaff
-        < \context Staff = up   {
+        << \new Staff   {
 	    \stemDown
 	    \stemExtend
 	    f'4
 	    \stemExtend
 	    \noFlag
 	    f'8 }
-          \context Staff = down {
+          \new Staff {
 	      \clef bass
 	      a4 a8 }
-	  >
+	  >>
 
     \paper { raggedright = ##t}
 }