boernel/lilypond-common-includes
10
0
Fork 0
Code Issues 10 Pull Requests Packages Projects Releases Wiki Activity

fix verse-chord multiple transpose problem

Browse Source
This commit is contained in:
Christoph Wagner 2024-05-12 16:13:56 +02:00
parent 8c7386807b
commit 199f515be9
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
verses_with_chords.ly
View File

@ -232,12 +232,12 @@
#{
\markup {
\override #`(baseline-skip . ,intraverse-vspace)
\pad-left #-10
\pad-left #-5
\score-equal-height #verse-line-height \score-lines {
\transposable
<<
\new Devnull { #(if (ly:music? verse-break-voice) verse-break-voice) }
#(if (ly:music? verse-chords) verse-chords #{ \chords { \verseChords } #})
#(if (ly:music? verse-chords) (music-clone verse-chords) #{ \chords { \verseChords } #})
\new NullVoice { #(if (ly:music? verse-reference-voice) verse-reference-voice #{ \global \firstVoice #}) }
\addlyrics { #lyrics }
>>
@ -245,7 +245,7 @@
\lyricsWithChordsLayout
\context {
\Staff
\override LeftEdge.space-alist.first-note = #'(fixed-space . 10.0)
\override LeftEdge.space-alist.first-note = #'(fixed-space . 5.0)
}
}
}