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

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