better override system
This commit is contained in:
@ -52,6 +52,12 @@ bchord =
|
||||
% additional bass notes should get uppercased
|
||||
#(define (bassnote-name->german-markup-nosym pitch lowercase?)(note-name->german-markup-nosym pitch #f))
|
||||
|
||||
|
||||
#(define chordNameExceptions
|
||||
(if (defined? 'customChordPrintings)
|
||||
(sequential-music-to-chord-exceptions customChordPrintings #t)
|
||||
'()))
|
||||
|
||||
generalLayout = \layout {
|
||||
\generalLayout
|
||||
\context {
|
||||
@ -66,6 +72,7 @@ generalLayout = \layout {
|
||||
chordRootNamer = #note-name->german-markup-nosym
|
||||
chordNoteNamer = #bassnote-name->german-markup-nosym
|
||||
majorSevenSymbol = "maj7"
|
||||
chordNameExceptions = \chordNameExceptions
|
||||
% der baseline-skip der Akkorde beeinflusst, wie hoch die Hochstellung ist
|
||||
\override ChordName.baseline-skip = #1.0
|
||||
}
|
||||
|
Reference in New Issue
Block a user