]> git.donarmstrong.com Git - lilypond.git/blob - input/test/bar-lines-lyric-only.ly
1c791feb7d9b93eb7d6f9bf5bf24f0bdbfa88715
[lilypond.git] / input / test / bar-lines-lyric-only.ly
1 \version "2.1.26"
2 \header { texidoc = "@cindex Bar line lyric only
3 You can move @code{Bar_engraver} and @code{Span_bar_engraver} to 
4 a different engraving context, if you want, for example, bar lines 
5 on lyrics. "
6 }
7
8 \score {
9 \notes \relative c' \context ChoirStaff <<
10  \new Staff { c1 c1 c1}
11  \context Lyrics \lyrics <<
12   { bla1 die bla }
13   { foo bar foo }
14   { foo bar foo }  
15  >>
16  \new Staff { c1 c1 c1} 
17  >>
18
19
20 \paper  {
21         raggedright = ##t
22 \translator {
23   \LyricsContext
24   \consists Bar_engraver
25   % need procedure, since lyrics doesn't have a staff_sym engraver.
26   \override BarLine #'bar-size-procedure = #(lambda (x) 3.0)
27 }
28 \translator {
29   \LyricsContext
30   \consists "Span_bar_engraver"
31 }
32 \translator{
33   \ChoirStaffContext
34   \remove "Span_bar_engraver"
35 }
36 \translator {
37   \StaffContext
38   \remove "Bar_engraver"
39 }
40 }}
41