Adds an explanatory comment to skyline.cc.

[lilypond.git] / input / regression / line-arrows.ly

diff --git a/input/regression/line-arrows.ly b/input/regression/line-arrows.ly
index 729c3645d8df2c9cd1556439c052ba45a8593f33..1b3bccc8a3dd41ec84f69b70d7aab8e0a38b9a8a 100644 (file)
--- a/input/regression/line-arrows.ly
+++ b/input/regression/line-arrows.ly
@@ -2,21 +2,26 @@
   texidoc = "Arrows can be applied to text-spanners and line-spanners (such as the Glissando)"
 }
 
-\version "2.7.13"
+\version "2.17.6"
 
 \paper {
-  raggedright = ##t
+  ragged-right = ##t
 }
 
 \relative c'' {
-  \override TextSpanner #'edge-text = #'("foo" . "bar")
-  \override TextSpanner #'bound-padding = #1.0
-  \override TextSpanner #'dash-fraction = #'()
-  \override TextSpanner #'arrow = ##t
+  \override TextSpanner.bound-padding = #1.0
+  \override TextSpanner.style = #'line
+  \override TextSpanner.bound-details.right.arrow = ##t
+  \override TextSpanner.bound-details.left.text = #"fof"
+  \override TextSpanner.bound-details.right.text = #"gag"
+  \override TextSpanner.bound-details.right.padding = #0.6
+
+  \override TextSpanner.bound-details.right.stencil-align-dir-y = #CENTER
+  \override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
   
-  \override Glissando #'arrow = ##t
-  \override Glissando #'arrow-length = #0.5
-  \override Glissando #'arrow-width = #0.25
+  \override Glissando.bound-details.right.arrow = ##t
+  \override Glissando.arrow-length = #0.5
+  \override Glissando.arrow-width = #0.25
   
   a8\startTextSpan gis8 a4 b4\glissando
   b,4 | g' c\stopTextSpan c