From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sun, 10 Jun 2007 03:26:34 +0000 (-0300)
Subject: junk ice-9 format
X-Git-Tag: release/2.11.27-1~15^2~4^2~8
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=1d55b59129e91c62f6080e747cd37782a1ddcabc;p=lilypond.git

junk ice-9 format
---

diff --git a/scm/output-tex.scm b/scm/output-tex.scm
index 4be3278397..00e0fea7ba 100644
--- a/scm/output-tex.scm
+++ b/scm/output-tex.scm
@@ -42,7 +42,6 @@
 
 (use-modules (ice-9 regex)
 	     (ice-9 string-fun)
-	     (ice-9 format)
 	     (guile)
 	     (srfi srfi-13)
 	     (scm framework-tex)
@@ -126,7 +125,7 @@
   (embedded-ps (list 'round-filled-box  x y width height blotdiam)))
 
 (define (text font s)
-  (format
+  (format #f
    "\\hbox{\\~a{}~a}" (tex-font-command font)
    (sanitize-tex-string s)))