X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbeam-cross-staff-slope.ly;h=24844a682e24a175d43c1289871490dd189f582d;hb=b872748c6aa8bb721ced458691b38ac2fac5dfc8;hp=fbc9747511538185fdc8c7546dbe5f7d0966aa2d;hpb=e9bd265943d37689b1a6892217cb6f67bbe69f73;p=lilypond.git

diff --git a/input/regression/beam-cross-staff-slope.ly b/input/regression/beam-cross-staff-slope.ly
index fbc9747511..24844a682e 100644
--- a/input/regression/beam-cross-staff-slope.ly
+++ b/input/regression/beam-cross-staff-slope.ly
@@ -1,33 +1,31 @@
-#(ly:set-option 'old-relative)
-\version "1.9.1"
+\version "2.19.21"
 \header {
-    texidoc = "Cross staff  (kneed) beams don't cause extreme slopes."
+    texidoc = "Cross staff  (kneed) beams do not cause extreme slopes."
 }
 
-\score {
-    \notes\context PianoStaff <
-    \context Staff = up
-    \relative c'' <
-        {
-	    \stemDown
-            f16( \> d b\! \translator Staff = down \stemUp
-            \clef treble g ~ << g e>>8)
-	    
-	     e[ \translator Staff = up
-	    \stemDown
-	    e e]
-	    \translator Staff = down
-	    \stemUp
-	    e8.[
-		\translator Staff = up
-	    \stemDown
-	    e8.]
-	    
-	} \\
-    >
-    \context Staff = down {
-        \time 3/8 \clef bass s4.*3 }
-    >
-    \paper { raggedright = ##t}
-}
+\layout { ragged-right = ##t}
+
+\context PianoStaff <<
+  \new Staff = "up"
+  \relative <<
+    {
+      \stemDown
+      f''16( d b \change Staff = down \stemUp
+      \clef treble g ~ < g e>8)
+      
+      e[ \change Staff = up
+	 \stemDown
+	 e e]
+      \change Staff = down
+      \stemUp
+      e8.[
+	\change Staff = up
+	\stemDown
+	e8.]
+      
+    } \\
+  >>
+  \new Staff = "down" {
+    \time 3/8 \clef bass s4.*3 }
+>>