microtherion/VocalEasel
1
0
Fork 0
mirror of https://github.com/microtherion/VocalEasel.git synced 2024-12-22 11:14:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

Deal with variable number of arguments to vlBassNamer

Browse Source
This commit is contained in:
Matthias Neeracher 2011-07-24 03:28:21 +00:00
parent 13bdae7ad6
commit 7f44a763d8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Resources/Templates/default.lyt
View File

@ -31,9 +31,9 @@ vlFlat = #(markup #:hspace 0.2 (alteration->text-accidental-markup FLAT))
"Stack two accidentals" "Stack two accidentals"
(interpret-markup layout props (interpret-markup layout props
(markup #:raise 3.0 #:fontsize -5.0 #:column (#:with-dimensions '(0 . 3) '(0 . 5) top bottom)))) (markup #:raise 3.0 #:fontsize -5.0 #:column (#:with-dimensions '(0 . 3) '(0 . 5) top bottom))))
#(define-public (vlBassNamer pitch) #(define-public (vlBassNamer . args)
"Return pitch markup for PITCH." "Return pitch markup for PITCH."
(markup #:sub #:line (#:raise 1.0 "/" (note-name->markup pitch)))) (markup #:sub #:line (#:raise 1.0 "/" (apply note-name->markup args))))
vlExceptionMusic = { vlExceptionMusic = {
<c e g bes d' a'>1-\markup { \super "13" } <c e g bes d' a'>1-\markup { \super "13" }