patch::: 1.3.96.jcn9

[lilypond.git] / input / test / chords.ly

diff --git a/input/test/chords.ly b/input/test/chords.ly
index 4d1383e2adbd7560412d78a8ffb699c2d6ab814d..76e1ca73954c41e1661711a9d66ce44c7796c47b 100644 (file)
--- a/input/test/chords.ly
+++ b/input/test/chords.ly
@@ -1,4 +1,4 @@
-\version "1.3.42";
+\version "1.3.97";
 
 %{
 Would this be acceptable/good enough/convenient for entry?
@@ -37,21 +37,21 @@ keys = \notes{
                 s1 s1 s1
                 s1 s1
                 s1
-                \key g; s1
-                \key d; s1 
-                \key a; s1 
-                \key e; s1 
-                \key b; s1 
-                \key fis; s1
-                \key c; s1 
-                \key f; s1 
-                \key bes; s1
-                \key es; s1
-                \key as; s1
-                \key des; s1
-                \key ges; s1
-                \key c; s1*2
-                \key c; s1*6
+                \key g \major; s1
+                \key d \major; s1 
+                \key a \major; s1 
+                \key e \major; s1 
+                \key b \major; s1 
+                \key fis \major; s1
+                \key c \major; s1 
+                \key f \major; s1 
+                \key bes \major; s1
+                \key es \major; s1
+                \key as \major; s1
+                \key des \major; s1
+                \key ges \major; s1
+                \key c \major; s1*2
+                \key c \major; s1*6
        }
 
 \score{
@@ -59,4 +59,10 @@ keys = \notes{
                \context ChordNames \scales
                \context Staff < \scales \keys >
        >
+       \paper{
+               \translator { 
+                       \ChordNamesContext
+                       ChordNames \push #'word-space = #1 
+               }
+       }
 }