Fix Issue 1780: Scheme format functions with no destination parameter cause deprecati...

[lilypond.git] / scm / document-identifiers.scm

diff --git a/scm/document-identifiers.scm b/scm/document-identifiers.scm
index ffccf72c30e06294902362e10ba4fc4703ac7fc5..b456acf334a14f6a4dc974ae9918813033259d20 100644 (file)
--- a/scm/document-identifiers.scm
+++ b/scm/document-identifiers.scm
@@ -31,11 +31,11 @@
 
        (signature-str
        (string-join
-        (map (lambda (x) (format "@var{~a} (~a)"
+        (map (lambda (x) (format #f "@var{~a} (~a)"
                                  (car x)
                                  (cadr x)))
              (zip arg-names type-names)))))
-    (format
+    (format #f
      "@item @code{~a}~a~a
 @findex ~a
 ~a
@@ -60,7 +60,7 @@
 
 
 (define-public (identifiers-doc-string)
-  (format
+  (format #f
    "@table @asis
 ~a
 @end table