pad left for stanzas to have a minimum distance to SystemStartBar

This commit is contained in:
2026-02-22 13:22:45 +01:00
parent 9c437d0f06
commit 7b166f6fc3

View File

@@ -149,10 +149,11 @@ override-stanza =
(stanza-style (ly:assoc-get 'style (ly:context-grob-definition context 'StanzaNumber)))
(roman-format (lambda (stanzanumber) (format #f "~@r" stanzanumber))))
(ly:context-set-property! context 'stanza
(make-pad-left-markup 1
(number-formater
(if (eq? stanza-style 'roman)
(map roman-format stanzanumbers)
stanzanumbers)))))
stanzanumbers))))))
#(define (stanza . stanzanumbers)
#{