* GNUmakefile.in (short-examples):

[lilypond.git] / ly / german-chords-init.ly

diff --git a/ly/german-chords-init.ly b/ly/german-chords-init.ly
index cb741eba1442e72b071ca5876ba3e9e6ce9a7f3c..020d1a94639787e6443f4064baefdd3bc5d11d8d 100644 (file)
--- a/ly/german-chords-init.ly
+++ b/ly/german-chords-init.ly
@@ -1,10 +1,10 @@
-\version "1.3.148"
+\version "1.5.49"
 
-%  german-chords.ly:
+%  german-chords-init.ly:
 % german/norwegian/danish?
 
 % To get Bb instead of B, use
-% \include "german-chords.ly"
+% \include "german-chords-init.ly"
 % #(set! german-Bb #t)
 
 #(define german-Bb #f)
@@ -14,7 +14,8 @@
                      (list 7 (+ (if german-Bb 0 1) (caddr pitch)))
                      (cdr pitch)
                 )))
-     (cons
+       (list
+        'columns
        (list-ref '("C" "D" "E" "F" "G" "A" "H" "B") (car dopitch))
        (accidental->text-super (cadr dopitch))
      )