X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fbar-lines-lyric-only.ly;h=5ec7c28e788450c46ee4007787d13dab9fc5ea85;hb=d02446a61d3eabfde67ed48928ae07766c97750f;hp=6dbf33f3c6bcd765387a22b843f031d67d155930;hpb=9c31b0d42a407a412a324a6586cfb0437de4bfd8;p=lilypond.git diff --git a/input/test/bar-lines-lyric-only.ly b/input/test/bar-lines-lyric-only.ly index 6dbf33f3c6..5ec7c28e78 100644 --- a/input/test/bar-lines-lyric-only.ly +++ b/input/test/bar-lines-lyric-only.ly @@ -1,4 +1,4 @@ -\version "2.1.36" +\version "2.7.32" \header { texidoc = "@cindex Bar line lyric only You can move @code{Bar_engraver} and @code{Span_bar_engraver} to a different engraving context, if you want, for example, bar lines @@ -6,36 +6,33 @@ on lyrics. " } \score { -\notes \relative c' \context ChoirStaff << - \new Staff { c1 c1 c1} - \context Lyrics \lyrics << - { bla1 die bla } - { foo bar foo } - { foo bar foo } - >> - \new Staff { c1 c1 c1} - >> + \relative c' \context ChoirStaff << + \new Staff { c1 c1 c1} + \lyricmode << + \new Lyrics { bla1 die bla } + >> + \new Staff { c1 c1 c1} + >> -\paper { - raggedright = ##t -\context { - \LyricsContext - \consists Bar_engraver - % need procedure, since lyrics doesn't have a staff_sym engraver. - \override BarLine #'bar-size-procedure = #(lambda (x) 3.0) -} -\context { - \LyricsContext - \consists "Span_bar_engraver" -} -\context{ - \ChoirStaffContext - \remove "Span_bar_engraver" -} -\context { - \StaffContext - \remove "Bar_engraver" + \layout { + ragged-right = ##t + \context { + \Lyrics + \consists Bar_engraver + + + %% need procedure, since lyrics doesn't have a staff_sym engraver. + \override BarLine #'bar-size = #3.0 + } + \context{ + \ChoirStaff + \remove "Span_bar_engraver" + } + \context { + \Staff + \remove "Bar_engraver" + } + } } -}}