Werner LEMBERG <w...@gnu.org> writes:
>>> what must I write to shorten an unbeamed stem by, say, one unit? A
>>> naive approach would be
>>>
>>> \once \override Stem.length #(- ly:stem::calc-length 1)
>>
>> looking for
>>
>> \override Stem.length-fraction = #(magstep -1)
>
> Thanks, but no. I'm interested in shortening the stem by a fixed
> amount, not scaling the whole stem length by a factor.
(define ((stem-reduce amount) grob)
(let ((l (ly:grob-property grob 'length)))
(/ (- l amount) l)))
\override Stem.length-fraction = #(stem-reduce 1)
This is probably slightly absurd (and untested to boot), but it would
likely work.
--
David Kastrup
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
