Chord Names

[Rune Zedeler]

The chord names still look rather strange.
The accidentals are typeset too low - and a space has appeared before
the alterations so that
                    7             7
c:7 is typeset as C   instead of C

For now I just included a small fix since german-chords was completely
broken.
Why, by the way, have you changed the filename of german-chords?

-Rune

--- lilypond-1.5.12/ly/german-chords-init.ly~  Fri Sep 28 17:22:55 2001
+++ lilypond-1.5.12/ly/german-chords-init.ly   Fri Sep 28 17:23:33 2001
@@ -1,10 +1,10 @@
-\version "1.3.148"
+\version "1.5.12"
 
-%  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))
      )