]> git.donarmstrong.com Git - lilypond.git/commitdiff
new file
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Sat, 4 Jan 2003 18:11:50 +0000 (18:11 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Sat, 4 Jan 2003 18:11:50 +0000 (18:11 +0000)
input/regression/chord-name-styles.ly

index 46c15b356d3e2eb7ad3c2bc67d2322d94089db6d..a50bdff3aa192119439cafa7bb31115c700001dd 100644 (file)
@@ -6,7 +6,7 @@
 
 scheme = \chords {
   % major chords
-  c
+  c1
   c:6          % 6 = major triad with added sixth
   c:maj                % triangle = maj
   c:6.9^7      % 6/9 
@@ -47,16 +47,16 @@ scheme = \chords {
 
 \score {
   \notes <
-    \context ChordNames {
-       #(set-chord-name-style 'jazz)
-       \property ChordNames.instrument = #"Jazz"
-       \property ChordNames.instr = #"Jz"
-       \scheme }
     \context ChordNames = bn {
        #(set-chord-name-style 'banter)
        \property ChordNames.instrument = # "Banter"
        \property ChordNames.instr = #"Bn"
        \scheme }
+    \context ChordNames = jz {
+       #(set-chord-name-style 'jazz)
+       \property ChordNames.instrument = #"Jazz"
+       \property ChordNames.instr = #"Jz"
+       \scheme }
     \context ChordNames = am {
        #(set-chord-name-style 'american)
        \property ChordNames.instr = #"Am"