]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/chord-names-german.ly
small fixes.
[lilypond.git] / input / test / chord-names-german.ly
index 81aa0620aad8ce86300043ce0d2453f4ce12b65e..82f7dc878fb79cd9ca527c092e41f75f1f930c04 100644 (file)
@@ -1,13 +1,9 @@
-\version "1.9.0"
+\version "2.2.0"
 \header  {
     texidoc = "@cindex Chord Names German
-By setting @code{ChordNames.chordRootNamer}, the root
-of the chord may be named with a different function.
-
-Setting @code{\germanChords} gives true german chord-names,
-@code{\semiGermanChords} gives semi-german chord-names - - with Bb and
-keeping the english names.
-
+The english naming of chords (default) can be changed to german 
+(@code{\germanChords} replaces B and Bes to H and B) or semi-german 
+(@code{\semiGermanChords} replaces B and Bes to H and Bb).
 
 " }
 
@@ -20,17 +16,17 @@ scm = \chords {
     % beses/beses
 } 
 \score {
-\notes <
+\notes <<
     \context ChordNames { \scm }
-    \context ChordNames = CA {
-       \property ChordNames.instrument = #"german"
+    \new ChordNames {
+       \set instrument = #"german"
        \germanChords \scm }
-    \context ChordNames = CB {
-       \property ChordNames.instrument =#"semi-german"
+    \new ChordNames {
+       \set instrument = #"semi-german"
        \semiGermanChords \scm }
-    \context Voice {  \scm } >
+    \context Voice {  \scm } >>
 \paper {
     raggedright = ##t 
-    \translator {\ChordNamesContext \consists Instrument_name_engraver }}
+    \context {\ChordNamesContext \consists Instrument_name_engraver }}
 
 }