* scm/fret-diagrams.scm (draw-dots): default values for dot size

[lilypond.git] / scm / output-tex.scm

diff --git a/scm/output-tex.scm b/scm/output-tex.scm
index c75994d0c3191d5d9a8fbf95aa5e0b01e3162679..d72583ef4c521003f7550678ddc43670ead34388 100644 (file)
--- a/scm/output-tex.scm
+++ b/scm/output-tex.scm
@@ -42,6 +42,7 @@
             filledbox
             round-filled-box
             text
+            white-text
             tuplet
             polygon
             draw-line
@@ -169,7 +170,9 @@
                        s))
                   "}")))
 
-
+(define (white-text s)
+   (embedded-ps (list 'white-text s)))
+   
 (define (tuplet ht gapx dx dy thick dir)
   (embedded-ps (list 'tuplet  ht gapx dx dy thick dir)))