make cues configurable
This commit is contained in:
@ -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))
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user