improve spacing of chordlyrics

This commit is contained in:
tux
2024-06-30 19:02:12 +02:00
parent bab581042a
commit 09d3bb7fa1
2 changed files with 12 additions and 12 deletions

View File

@ -98,15 +98,6 @@ generalLayout = \layout {
}
}
#(define-public (custom-lyric-text::print grob)
"Allow interpretation of tildes as lyric tieing marks."
;; See also similar code in Lyric_performer.
(let ((text (ly:grob-property grob 'text)))
(grob-interpret-markup grob (if (string? text)
(make-pad-right-markup -0.1 (make-tied-lyric-markup text))
text))))
% Akkord mit Bunddiagramm anzeigen
#(define-markup-command (fret-chord layout props fret chord) (string? string?)
(interpret-markup layout props