Here's another example of an ugly output (whiteout.png) \override DynamicText.whiteout = ##t
Something has to be done to prevent situations like this.
As a workaround I use this solution:
------begin------
#(define-public
(stencil-with-color stencil color)
(ly:make-stencil
(list 'color color
(ly:stencil-expr stencil))
(ly:stencil-extent stencil X)
(ly:stencil-extent stencil Y)))
#(define
(stencil-padded-whiteout stencil padding)
(let*
((x-ext
(ly:stencil-extent stencil X))
(y-ext
(ly:stencil-extent stencil Y)))
(ly:stencil-add
(stencil-with-color
(ly:round-filled-box
(interval-widen x-ext padding)
(interval-widen y-ext padding) 0) white) stencil)))
#(define
(text-in-white-box grob)
(stencil-padded-whiteout
(ly:text-interface::print grob) 0.2))
\layout {
\context {
\Score
\override DynamicText.stencil = #text-in-white-box
}
}
-------end-------
This code does the job, but i'm not sure if it has any drawbacks. Any thoughts?
-Karol
<<attachment: whiteout.png>>
_______________________________________________ lilypond-user mailing list lilypond-user@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-user
