X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Foutput-lib.scm;h=219a287cd1d55c921442f2419bfd3dc0a981731e;hb=6d451df53791b15dc4707694deb3622b33299997;hp=400506a8a5f119d84abdeacab8efd7abd876c1e4;hpb=eebafce7c459edf00becf210acc06ce36eb80462;p=lilypond.git diff --git a/scm/output-lib.scm b/scm/output-lib.scm index 400506a8a5..219a287cd1 100644 --- a/scm/output-lib.scm +++ b/scm/output-lib.scm @@ -27,15 +27,14 @@ (pair? (ly:grob-basic-properties grob))) (define-public (make-stencil-boxer thickness padding callback) - "Return function that adds a box around the grob passed as argument." (lambda (grob) (box-stencil (callback grob) thickness padding))) (define-public (make-stencil-circler thickness padding callback) "Return function that adds a circle around the grob passed as argument." - - (lambda (grob) (circle-stencil (callback grob) thickness padding))) + (lambda (grob) + (circle-stencil (callback grob) thickness padding))) (define-public (print-circled-text-callback grob) (grob-interpret-markup grob (make-circle-markup