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

[lilypond.git] / scm / page.scm

diff --git a/scm/page.scm b/scm/page.scm
index f65c9559d3ca7510e695638c0c0ae3c949245bd9..0a30acef4dd0471f837cb2d5acf2c9bb6fcffe71 100644 (file)
--- a/scm/page.scm
+++ b/scm/page.scm
@@ -69,7 +69,7 @@
  (lambda (j)
    (module-define!
     page-module
-    (string->symbol (format "page-~a" j))
+    (string->symbol (format #f "page-~a" j))
     (lambda (pg)
       (page-property pg j))))