Zwischenrufe als stanzas
This commit is contained in:
@@ -235,3 +235,19 @@ cue =
|
||||
(make-null-markup))
|
||||
}
|
||||
#})
|
||||
|
||||
#(define-markup-command (ruf-style layout props text) (string?)
|
||||
(interpret-markup layout props
|
||||
(markup #:italic (string-append "(" text ")"))))
|
||||
rufWithMarkup =
|
||||
#(define-music-function (text) (markup?)
|
||||
#{
|
||||
\lyricmode {
|
||||
\once \override StanzaNumber.font-series = #'normal
|
||||
\once \override StanzaNumber.direction = 1
|
||||
\set stanza = #text
|
||||
}
|
||||
#})
|
||||
ruf =
|
||||
#(define-music-function (text) (string?)
|
||||
(rufWithMarkup (make-ruf-style-markup text)))
|
Reference in New Issue
Block a user