Marked file for deletion, or just modified comments.

[lilypond.git] / input / test / chord-names-german.ly

diff --git a/input/test/chord-names-german.ly b/input/test/chord-names-german.ly
index d3ab83d78327bb1b5a4b91180a4fd073bed9877d..76e44f018c37484be3d55c068b0f4b7e2a9c873f 100644 (file)
--- a/input/test/chord-names-german.ly
+++ b/input/test/chord-names-german.ly
@@ -1,20 +1,16 @@
-
-\version "1.7.17"
+\version "1.7.20"
 \header  {
+    texidoc = "@cindex Chord Names German
+By setting @code{ChordNames.chordRootNamer}, the root
+of the chord may be named with a different function.
+" }
 
-    texidoc = "By setting @code{ChordNames.chordRootNamer}, the root
-of the chord may be named with a different function."
-
-}
-
-scm = \chords { c4/c cis/cis cisis/cisis ces/ces ceses/ceses b/b bis/bis bes/bes beses/beses } 
+scm = \chords { c1/c cis/cis cisis/cisis ces/ces ceses/ceses b/b bis/bis bes/bes beses/beses \bar "||" } 
 \score {
-<    \context ChordNames \chords <
-    % #t gives true german chord-names
-    % #f gives semi-german chord-names -
+\notes <
+    % \germanChords gives true german chord-names
+    % \semiGermanChords gives semi-german chord-names -
     % - with Bb and below keeping the english names
-    \property ChordNames. chordRootNamer = #(chord-name->german-markup #f)
-    \property ChordNames. chordNoteNamer = #note-name->german-markup
-    \scm >
-    \context Voice \scm >
+    \context ChordNames { \scm \germanChords \scm \semiGermanChords \scm }
+    \context Voice { \scm s1*0^"germanChords" \scm s1*0^"semiGermanChords" \scm } >
 }