]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/bar-line-define-bar-line.ly
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / input / regression / bar-line-define-bar-line.ly
1 \version "2.19.21"
2
3 \header { texidoc = "New bar line styles can be defined by @code{\\defineBarLine}."
4         }
5
6 \paper { ragged-right = ##t }
7
8 \defineBarLine "[|;" #'("|" "[|;" " |")
9 \defineBarLine ";|]" #'(";|]" "" " |")
10
11 \relative \new StaffGroup <<
12   \new Staff {
13     c'4 c \bar "[|;" c c \bar ";|]" \break
14     c4 c \bar ";|]" c c \bar "[|;" \break
15     c1 }
16   \new Staff {
17     c4 c c c
18     c4 c c c
19     c1
20   }
21 >>