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

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