-\version "1.7.2"
-\header {
-texidoc = "ottava spanners."
-}
+\version "2.10.0"
+
+\header { texidoc = "@cindex text spanner
+Text spanners can be used in the similar manner than markings for pedals
+or octavation.
+"
+ }
+\layout{ ragged-right = ##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
-\score{
- \notes\relative c''{
- \property Voice.TextSpanner \override #'edge-text = #'("8 " . "")
- a #(ly-export (make-span-event 'TextSpanEvent START))
- b c
- a #(ly-export (make-span-event 'TextSpanEvent STOP))
-
- \property Voice.TextSpanner \revert #'type
- \property Voice.TextSpanner \override #'type = #'dotted-line
- a #(ly-export (make-span-event 'TextSpanEvent START))
- b c
- a #(ly-export (make-span-event 'TextSpanEvent STOP))
-
- \property Voice.TextSpanner \revert #'type
- \property Voice.TextSpanner \override #'type = #'dashed-line
- \property Voice.TextSpanner \override #'edge-height = #'(1 . -2)
- a #(ly-export (make-span-event 'TextSpanEvent START))
- b c
- a #(ly-export (make-span-event 'TextSpanEvent STOP))
-
-
- \property Staff.centralCPosition = #-13
-
- \property Voice.TextSpanner \override #'dash-length = #5
- \property Voice.TextSpanner \override #'thickness = #10
- a #(ly-export (make-span-event 'TextSpanEvent START))
- b c
- a #(ly-export (make-span-event 'TextSpanEvent STOP))
- \property Staff.centralCPosition = #-6
- }
+ \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
}
+