Reviewers: ,
Message:
Please review, thanks.
-Paul
Description:
stencil.scm: make args optional in stencil-whiteout
Please review this at https://codereview.appspot.com/284980043/
Affected files (+2, -1 lines):
M scm/stencil.scm
Index: scm/stencil.scm
diff --git a/scm/stencil.scm b/scm/stencil.scm
index
bec03016505e4cc5317061f08d2b80f5e416e53f..950d99f9cb8e2b1e61baf87638e81b558105766a
100644
--- a/scm/stencil.scm
+++ b/scm/stencil.scm
@@ -801,7 +801,8 @@ the white outline extends past the extents of stencil
@var{stil}."
(stencil-with-color (ly:round-filled-box x-ext y-ext blot) color)
stil)))
-(define-public (stencil-whiteout stil style thickness line-thickness)
+(define*-public (stencil-whiteout stil #:optional (style 'box)
+ (thickness '()) (line-thickness 0.1))
"@var{style} is a symbol that determines the shape of the white
background. @var{thickness} is how far, as a multiple of
@var{line-thickness}, the white background extends past the extents
_______________________________________________
lilypond-devel mailing list
lilypond-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-devel
