]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/chord-changes.ly
patch::: 1.3.134.jcn1
[lilypond.git] / input / regression / chord-changes.ly
1
2 \header{
3 texidoc="property chordChanges: only display chord names when
4 there's a change in the chords scheme, but always display the
5 chord name after a line break.
6 ";
7 }
8
9 scheme = \chords {
10   c1:m \break c:m c:m c:m d
11   c1:m \break c:m c:m c:m d
12 }
13
14 settings = {
15   \property ChordNames.chordChanges = ##t
16 }
17
18 \score {
19   \notes <
20     \context ChordNames < \scheme \settings >
21     \context Staff \transpose c'' \scheme
22   >
23   \paper{
24     linewidth = 40 * \staffspace;
25   }
26 }