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