Thinko: Translate final stencil in note-head::brew-ez-stencil.

diff --git a/scm/output-lib.scm b/scm/output-lib.scm
index c3d51282f0f0b6e25e78433fb7e22fd779615313..b9f5e421e9103609a7f6fc0cfcf1d3824b3324ea 100644 (file)
--- a/scm/output-lib.scm
+++ b/scm/output-lib.scm
@@ -140,18 +140,21 @@
         (letter (markup #:center-align #:vcenter pitch-string))
         (filled-circle (markup #:draw-circle radius 0 #t)))
 
-    (grob-interpret-markup
-     grob
-     (if (>= log 2)
-        (make-combine-markup
-         filled-circle
-         (make-with-color-markup white letter))
-        (make-combine-markup
+    (ly:stencil-translate-axis
+     (grob-interpret-markup
+      grob
+      (if (>= log 2)
          (make-combine-markup
           filled-circle
-          (make-with-color-markup white (make-draw-circle-markup
-                                         (- radius stem-thickness) 0 #t)))
-         letter)))))
+          (make-with-color-markup white letter))
+         (make-combine-markup
+          (make-combine-markup
+           filled-circle
+           (make-with-color-markup white (make-draw-circle-markup
+                                          (- radius stem-thickness) 0 #t)))
+          letter)))
+     radius X)))
+
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; break visibility