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

@ -218,4 +218,16 @@ dottedExtender = {
}
melisOff = \set ignoreMelismata = ##t
melisOn = \unset ignoreMelismata
melisOn = \unset ignoreMelismata
cue =
#(define-music-function (zahlen) (number-list?)
#{
\tag #'cues {
\tweak self-alignment-X #LEFT
\mark
#(make-on-the-fly-markup
(lambda (layout props m) (interpret-markup layout (prepend-alist-chain 'cues zahlen props) (ly:output-def-lookup layout 'cueMarkup)))
(make-null-markup))
}
#})