*** empty log message ***

[lilypond.git] / ps / music-drawing-routines.ps

diff --git a/ps/music-drawing-routines.ps b/ps/music-drawing-routines.ps
index 72724ec111f66cce4be7c746bfeb37c19e38391e..7ee1498305514a3c91fb72cc3fe783d1eac16a97 100644 (file)
--- a/ps/music-drawing-routines.ps
+++ b/ps/music-drawing-routines.ps
@@ -153,12 +153,15 @@
 } bind def
 
 
-/draw_white_text % text font
+/draw_white_text  % text scale font
 {
   %font
-  findfont 0.8 scalefont setfont
+  findfont
+  %scale
+  exch scalefont setfont
   1 setgray
   0 0 moveto
+  %-0.05 -0.05 moveto
   % text
   show
 } bind def