From: Han-Wen Nienhuys Date: Fri, 8 Jun 2007 23:53:28 +0000 (-0300) Subject: (no commit message) X-Git-Tag: release/2.11.27-1~15^2~4^2~12 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=aaeab637050be051ea85d8476c2ee21f2a416a48;p=lilypond.git --- diff --git a/input/lsr/text/creating-text-spanners.ly b/input/lsr/text/creating-text-spanners.ly new file mode 100644 index 0000000000..1298be6c30 --- /dev/null +++ b/input/lsr/text/creating-text-spanners.ly @@ -0,0 +1,42 @@ +%% Do not edit this file; it is auto-generated from LSR! +\version "2.11.23" + +\header { texidoc = " +The \startTextSpan and \stopTextSpan commands give you the ability to +create text spanners as easily as pedals indications or octavations. +Override some properties of the TextSpanner object to modify its +output. +" } + +\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 #'bound-details #'left #'text = \markup { \draw-line #'(0 . 1) } + \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'(0 . -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 +} + diff --git a/lily/beam-quanting.cc b/lily/beam-quanting.cc index 5bd62f19bc..a40621e61b 100644 --- a/lily/beam-quanting.cc +++ b/lily/beam-quanting.cc @@ -379,8 +379,7 @@ Beam::score_stem_lengths (vector const &stems, Direction d = DOWN; do score[d] /= max (count[d], 1); - while (flip (&d) != DOWN) - ; + while (flip (&d) != DOWN); return score[LEFT] + score[RIGHT]; }