make cues configurable

This commit is contained in:
2025-04-26 23:26:12 +04:00
parent 41bd881014
commit 37ee497f89
2 changed files with 23 additions and 1 deletions

View File

@ -22,3 +22,13 @@ refStringWithNumbers = "Ref. ~a:"
% hübsche Wiederholungszeichen für den Liedtext
repStart = "𝄆"
repStop = "𝄇"
\paper {
cueMarkup = \markup {
\italic
#(make-on-the-fly-markup (lambda (layout props m)
(interpret-markup layout props
(string-join (map (lambda (n) (format #f "~@r." n)) (chain-assoc-get 'cues props)) ", ")))
(make-null-markup))
}
}