CVSROOT: /cvsroot/lilypond
Module name: lilypond
Branch:
Changes by: Han-Wen Nienhuys <[EMAIL PROTECTED]> 05/04/18 12:31:20
Modified files:
input/regression: line-arrows.ly
Log message:
new file.
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/input/regression/line-arrows.ly.diff?tr1=1.1&tr2=1.2&r1=text&r2=text
Patches:
Index: lilypond/input/regression/line-arrows.ly
diff -u lilypond/input/regression/line-arrows.ly:1.1
lilypond/input/regression/line-arrows.ly:1.2
--- lilypond/input/regression/line-arrows.ly:1.1 Mon Apr 18 12:10:37 2005
+++ lilypond/input/regression/line-arrows.ly Mon Apr 18 12:31:20 2005
@@ -1,23 +1,23 @@
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\version "2.5.18"
+\header {
+ texidoc = "Arrows can be applied to text-spanners and line-spanners (such as
the Glissando)"
+}
-%% demonstration of line arrows
-%% By Jonatan Liljedahl <http://kymatica.com>
+\version "2.5.20"
-\relative c'' {
- %% Arrow between two texts
- \override TextSpanner #'edge-text = #'("foo" . "bar")
- \override TextSpanner #'dash-fraction = #'()
- \override TextSpanner #'style = #'line
- \override TextSpanner #'arrow = ##t
-
- %% Default arrow size
-% \override TextSpanner #'arrow-length = #1.3
-% \override TextSpanner #'arrow-width = #0.5
+\paper {
+ raggedright = ##t
+}
- %% We can put arrows to a glissando line
- \override Glissando #'arrow = ##t
-
- a8\startTextSpan gis8\< a2 b4\glissando
- c,4 g'\! c\stopTextSpan c
+\relative c'' {
+ \override TextSpanner #'edge-text = #'("foo" . "bar")
+ \override TextSpanner #'bound-padding = #1.0
+ \override TextSpanner #'dash-fraction = #'()
+ \override TextSpanner #'arrow = ##t
+
+ \override Glissando #'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
}
_______________________________________________
Lilypond-cvs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs
