[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Markup in absolute font size?
From: |
Patrick Horgan |
Subject: |
Re: Markup in absolute font size? |
Date: |
Sat, 28 Jun 2008 11:52:06 -0700 |
User-agent: |
Thunderbird 2.0.0.14 (X11/20080505) |
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