multiverseSkips and alt functions
This commit is contained in:
parent
88f0dc9f8f
commit
e9dec83764
@ -158,4 +158,12 @@ rightHyphen = \lyricmode {
|
|||||||
leftHyphen = \lyricmode {
|
leftHyphen = \lyricmode {
|
||||||
\once \override StanzaNumber.font-series = #'normal
|
\once \override StanzaNumber.font-series = #'normal
|
||||||
\set stanza = "-"
|
\set stanza = "-"
|
||||||
}
|
}
|
||||||
|
|
||||||
|
multiverseSkips =
|
||||||
|
#(define-music-function (parser location skips) (number?)
|
||||||
|
#{ \tag #'multiVerse { \repeat unfold #skips { \skip4 } } #})
|
||||||
|
|
||||||
|
alt =
|
||||||
|
#(define-music-function (parser location a b) (ly:music? ly:music?)
|
||||||
|
#{ \tag #'firstVerse { #a } \tag #'multiVerse { #b } #})
|
Loading…
Reference in New Issue
Block a user