From a4009ec19dce5429d4ea21b5ebd453cc82ab9ddf Mon Sep 17 00:00:00 2001
From: hanwen <hanwen>
Date: Mon, 20 Sep 2004 22:01:24 +0000
Subject: [PATCH] *** empty log message ***

---
 input/regression/text-spanner.ly | 12 +++---
 input/test/text-spanner.ly       | 66 ++++++++++++++++----------------
 2 files changed, 37 insertions(+), 41 deletions(-)

diff --git a/input/regression/text-spanner.ly b/input/regression/text-spanner.ly
index c38756d366..9a7537193d 100644
--- a/input/regression/text-spanner.ly
+++ b/input/regression/text-spanner.ly
@@ -1,18 +1,16 @@
 
 \version "2.3.17"
 \header {
-texidoc= "Text spanners should not repeat start text when broken."
+    texidoc= "Text spanners should not repeat start text when broken."
+}
+\paper {
+    raggedright = ##t 
 }
 
-\score {
-   \relative c'' {
+\relative c'' {
     \set crescendoText = #"cresc."
     \set crescendoSpanner = #'dashed-line
     c1\< c \break
     c1 c\! \break
-    }
-  \paper {
-    linewidth = 40*\staffspace
-  }
 }
 
diff --git a/input/test/text-spanner.ly b/input/test/text-spanner.ly
index 60c4554c87..5d6dfeed86 100644
--- a/input/test/text-spanner.ly
+++ b/input/test/text-spanner.ly
@@ -5,39 +5,37 @@
 Text spanners can be used in the similar manner than markings for pedals
 or octavation.
 "
-}
-
-\score{
-    \relative c''{
-        \override TextSpanner  #'edge-text = #'("bla" . "blu")
-        a \startTextSpan
-	b c 
-        a \stopTextSpan
-
-        \override TextSpanner  #'dash-period = #2
-        \override TextSpanner  #'dash-fraction = #0.0
-        a \startTextSpan
-	b c 
-        a \stopTextSpan
-
-        \revert TextSpanner #'style
-        \override TextSpanner  #'style = #'dashed-line
-        \override TextSpanner  #'edge-height = #'(1 . -2)
-        a \startTextSpan
-	b c 
-        a \stopTextSpan
-
-
-        \set Staff.middleCPosition = #-13
-
-        \override TextSpanner  #'dash-period = #10
-        \override TextSpanner  #'dash-fraction = #.5
-        \override TextSpanner  #'thickness = #10
-        a \startTextSpan
-	b c 
-        a \stopTextSpan
-        \set Staff.middleCPosition = #-6	
-    }
-	\paper{ raggedright = ##t}
+      }
+\paper{ raggedright = ##t}
+
+\relative c''{
+    \override TextSpanner  #'edge-text = #'("bla" . "blu")
+    a \startTextSpan
+    b c 
+    a \stopTextSpan
+
+    \override TextSpanner  #'dash-period = #2
+    \override TextSpanner  #'dash-fraction = #0.0
+    a \startTextSpan
+    b c 
+    a \stopTextSpan
+
+    \revert TextSpanner #'style
+    \override TextSpanner  #'style = #'dashed-line
+    \override TextSpanner  #'edge-height = #'(1 . -2)
+    a \startTextSpan
+    b c 
+    a \stopTextSpan
+
+
+    \set Staff.middleCPosition = #-13
+
+    \override TextSpanner  #'dash-period = #10
+    \override TextSpanner  #'dash-fraction = #.5
+    \override TextSpanner  #'thickness = #10
+    a \startTextSpan
+    b c 
+    a \stopTextSpan
+    \set Staff.middleCPosition = #-6	
 }
 
-- 
2.39.5