Fix residual unwanted whiteout in tablature

diff --git a/scm/tablature.scm b/scm/tablature.scm
index 702d15108b187a64184462978f887bd0335f6a32..a3efa78670d098a869b9520f384f817ee522a7ee 100644 (file)
--- a/scm/tablature.scm
+++ b/scm/tablature.scm
@@ -220,13 +220,15 @@
          (tab-note-head-parenthesized (assoc-get 'parenthesize repeat-tied-properties #t)))
 
     (if tab-note-head-visible
-       ;; tab note head is visible
-       (if tab-note-head-parenthesized
+        ;; tab note head is visible
+        (if tab-note-head-parenthesized
            (ly:grob-set-property! tied-tab-note-head 'stencil
                                   (lambda (grob)
                                     (parenthesize-tab-note-head grob))))
        ;; tab note head is invisible
-       (ly:grob-set-property! tied-tab-note-head 'transparent #t))))
+       (begin
+          (ly:grob-set-property! tied-tab-note-head 'transparent #t)
+          (ly:grob-set-property! tied-tab-note-head 'whiteout #f)))))
 
 ;; the slurs should not be too far apart from the corresponding fret number, so
 ;; we move the slur towards the TabNoteHeads: