release: 1.4.4

[lilypond.git] / scm / tex.scm

diff --git a/scm/tex.scm b/scm/tex.scm
index 3321bb9c95fe88fda58a0bf7c19544cbf2b0e701..4c8904415daed98e2311622b200b4c3fea45d084 100644 (file)
--- a/scm/tex.scm
+++ b/scm/tex.scm
@@ -164,18 +164,13 @@
     "}\\vss}\\interscoreline\n")
   (define (stop-last-line)
     "}\\vss}")
-  (define (xfilledbox breapth width depth height) 
+  (define (filledbox breapth width depth height) 
     (string-append 
      "\\kern" (number->dim (- breapth))
      "\\vrule width " (number->dim (+ breapth width))
      "depth " (number->dim depth)
      "height " (number->dim height) " "))
 
-  (define (filledbox breapth width depth height) 
-    (embedded-ps
-     (string-append (numbers->string (list breapth width depth height))
-                  " draw_box" )))
-
   (define (text s)
     (string-append "\\hbox{" (output-tex-string s) "}"))