Nicolas Sceaux wrote:
oops, baseline-skip and word-space should also be fixed absolutely, and
not based on the ones from props.
Do you mean like:
#(define-markup-command (abs-fontsize layout props size arg)
 (number? markup?)
 (let* ((ref-size (ly:output-def-lookup layout 'text-font-size 12))
        (magnification (/ size ref-size))
        (font-size (magnification->font-size magnification)))
(interpret-markup layout (cons `((baseline-skip . ,(magnification->font-size magnification))
     (word-space (magnification->font-size magnification))
     (font-size . ,font-size)) props) arg)))

Patrick


_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to