]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/bar-line.scm
Issue 4418/5 whiteout -> whiteout-box in scm/
[lilypond.git] / scm / bar-line.scm
index 02c80f64e535810ede4a6a7d7cc5df8f01ea1154..296d86787a828f57b248cd374303e6d8158cd5f9 100644 (file)
@@ -467,11 +467,11 @@ draws the span bar variant, i.e. without the segno sign."
 (define (make-kievan-bar-line grob extent)
   "Draw a kievan bar line."
   (let* ((font (ly:grob-default-font grob))
-         (stencil (stencil-whiteout
+         (stencil (stencil-whiteout-box
                    (ly:font-get-glyph font "scripts.barline.kievan"))))
 
     ;; the kievan bar line has no staff lines underneath,
-    ;; so we whiteout them and move the grob to a higher layer
+    ;; so we whiteout-box them and move the grob to a higher layer
     (ly:grob-set-property! grob 'layer 1)
     stencil))