X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Ftablature.scm;h=97f688c1d1e868d4242d3a085ab9d4856e3fddf3;hb=a447227710cb9b6c9fe61342a90e8cc85c022136;hp=9d5fdd223381e8d33a80478fbc3a382c0a7cfe08;hpb=0e4e1a56b7196523a1812c1d969e2f871f693ace;p=lilypond.git

diff --git a/scm/tablature.scm b/scm/tablature.scm
index 9d5fdd2233..97f688c1d1 100644
--- a/scm/tablature.scm
+++ b/scm/tablature.scm
@@ -235,7 +235,7 @@
 
 ;; a callback for custom fret labels
 (define ((tab-note-head::print-custom-fret-label fret) grob)
-  (ly:grob-set-property! grob 'text fret)
+  (ly:grob-set-property! grob 'text (make-vcenter-markup fret))
   (tab-note-head::print grob))
 (export tab-note-head::print-custom-fret-label)
 
@@ -280,9 +280,10 @@
                                            cautionary-width
                                            cautionary-angularity
                                            cautionary-padding)))
-    (ly:stencil-translate-axis (centered-stencil output-grob)
-                               column-offset
-                               X)))
+    (ly:stencil-translate-axis
+     (ly:stencil-aligned-to output-grob X CENTER)
+     column-offset
+     X)))
 
 ;; Harmonic definitions