*** empty log message ***

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

diff --git a/scm/output-tex.scm b/scm/output-tex.scm
index d72583ef4c521003f7550678ddc43670ead34388..253d97a26f8e905e59237c119a772226ed3190e4 100644 (file)
--- a/scm/output-tex.scm
+++ b/scm/output-tex.scm
@@ -170,8 +170,8 @@
                        s))
                   "}")))
 
-(define (white-text s)
-   (embedded-ps (list 'white-text s)))
+(define (white-text scale s)
+   (embedded-ps (list 'white-text scale s)))
    
 (define (tuplet ht gapx dx dy thick dir)
   (embedded-ps (list 'tuplet  ht gapx dx dy thick dir)))