input/test/bar-lines-lyric-only.ly

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