X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fspacing-2.ly;h=97830deb51f31fb63f4c52ccdf82f4d9018f0836;hb=d2e7425b88e579fe53989106965fa13eab551c92;hp=9b75220f1be60998b656a534e2c209c5c493399d;hpb=cda8fc1780778b760905c8832f7e984161218f20;p=lilypond.git

diff --git a/input/test/spacing-2.ly b/input/test/spacing-2.ly
index 9b75220f1b..97830deb51 100644
--- a/input/test/spacing-2.ly
+++ b/input/test/spacing-2.ly
@@ -1,36 +1,36 @@
+#(ly:set-option 'old-relative)
+\version "1.9.8"
+% more yummy regression goodness.  -gp
 \header {
-opus = "BWV 937 (prelude)";
-composer = "J. S. Bach";
-source = "Petits Preludes et Fugues.  Urtext. Editions Henry Lemoine, Paris.";
-}
-
-%{
-1. upon stretching: every note should stretch according to duration
+texidoc = "
+1. Upon stretching every note should stretch according to duration.
 
 2. 8th notes should be spaced equidistantly.
-%}
+"
+}
 
 \score { 
     \notes \relative c''
-	\context GrandStaff <
-	\context Staff = SA <
-		\context Voice = VA { \property Voice.verticalDirection= 1
+	\context GrandStaff <<
+	\new Staff <<
+		\new Voice { \stemUp\slurUp\tieUp
 			e4 dis4 e2 }
-		\context Voice = VB { \property Voice.verticalDirection= -1
-			[cis8 a] [fis b] gis2 }
-		{\key e \major; }
-		>
-	\context Staff = SB { \clef "bass"; \key e \major;
-		[a,,16 e dis e] [b'8 b,] [e16 e, gis b] e4
+		\new Voice { \stemDown\slurDown\tieDown
+			 cis8[ a]  fis[ b] gis2 }
+		{\key e \major }
+		>>
+	\new Staff { \clef "bass" \key e \major
+		 a,,16[ e dis e]  b'8[ b,]  e16[ e, gis b] e4
 	} 
-> 
+>> 
 
 \paper 
 {
-%	linewidth = 5.0 \cm; % ly2dvi barfs on -1
-	linewidth = 8.0 \cm;
-%	linewidth = 12.0 \cm;	
+%	linewidth = 5.0 \cm % ly2dvi barfs on -1
+	linewidth = 8.0 \cm
+%	linewidth = 12.0 \cm	
 }
 }
 
-\version "1.3.110"; 
+
+