Hi Malte,
> It would be nice though to have an easier method to make whole markups
> “absolute-sized”
That *would* be nice!
> Here my pt-based (instead of mm-based) abs-epsfile and abs-baseline-skip
> commands, maybe they are of interest for someone.
Here are the ones I use (can’t remember who wrote them?). I don’t know if
they’re different, or which is preferable — but thought you might like to see
them.
#(define-public (pt-to-ss size)
(let* ((5pt (ly:pt 5))
(output-scale (ly:output-def-lookup $defaultpaper 'output-scale 1))
(factor (/ output-scale 5pt))
(staff-space (* 5 factor)))
(/ size staff-space)))
#(define-markup-command (abs-baseline-skip layout props size arg)
(number? markup?)
#:category font
(interpret-markup layout
(cons `((baseline-skip . ,(pt-to-ss size)))
props)
arg))
Best,
Kieren.
________________________________
Kieren MacMillan, composer
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
