boernel/lilypond-common-includes
14
0
Fork 0
Code Issues 16 Pull Requests 1 Packages Projects Releases Wiki Activity

tagged case in lyricmode

Browse Source
This commit is contained in:
Christoph Wagner 2024-12-04 20:37:44 +01:00
parent c4f3a3c196
commit a558a0b02f
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
basic_format_and_style_settings.ly
View File

@ -174,4 +174,13 @@ multiVerseSkips =
alt = alt =
#(define-music-function (parser location a b) (ly:music? ly:music?) #(define-music-function (parser location a b) (ly:music? ly:music?)
#{ \tag #'firstVerse { #a } \tag #'multiVerse { #b } #}) #{ \tag #'firstVerse { #a } \tag #'multiVerse { #b } #})
updown =
#(define-music-function (parser location word) (string?)
#{
\lyricmode {
\tag #'up { \markup { #(string-capitalize word) } }
\tag #'down { \markup { #(string-downcase word) } }
}
#})