Add #f to format in lilypond-book.itely (issue 553690043 by address@hidden)

[thomasmorley65]

Reviewers: ,

Description:
Add #f to format in lilypond-book.itely

In the defiition of oly:create-toc-file a simple string is wished
for the local outfilename.
Thus add #f after format in:
(outfilename (format "~a.toc" output-name))

Please review this at https://codereview.appspot.com/553690043/

Affected files (+8, -8 lines):
  M Documentation/cs/usage/lilypond-book.itely
  M Documentation/de/usage/lilypond-book.itely
  M Documentation/es/usage/lilypond-book.itely
  M Documentation/fr/usage/lilypond-book.itely
  M Documentation/hu/usage/lilypond-book.itely
  M Documentation/it/usage/lilypond-book.itely
  M Documentation/ja/usage/lilypond-book.itely
  M Documentation/usage/lilypond-book.itely


Index: Documentation/cs/usage/lilypond-book.itely
diff --git a/Documentation/cs/usage/lilypond-book.itely 
b/Documentation/cs/usage/lilypond-book.itely
index 
b1f7c11e31e99256d00cd6b2dce8d9f5aecf1808..01fb1f5635b1fca73439c9a7868c019ec37240dc
 100644
--- a/Documentation/cs/usage/lilypond-book.itely
+++ b/Documentation/cs/usage/lilypond-book.itely
@@ -1222,7 +1222,7 @@ sich alle in der selben LilyPond-Datei befinden.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/de/usage/lilypond-book.itely
diff --git a/Documentation/de/usage/lilypond-book.itely 
b/Documentation/de/usage/lilypond-book.itely
index 
5c40607888bd94be8b4be78a4275e2972d921bc0..22e0e54e332999140d38abb774d29db8d6d4baf7
 100644
--- a/Documentation/de/usage/lilypond-book.itely
+++ b/Documentation/de/usage/lilypond-book.itely
@@ -1357,7 +1357,7 @@ sich alle in der selben LilyPond-Datei befinden.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/es/usage/lilypond-book.itely
diff --git a/Documentation/es/usage/lilypond-book.itely 
b/Documentation/es/usage/lilypond-book.itely
index 
bcfa83db246a1fbc108efe0184d69abd6714ef5a..f109b8695bf870b09cb436250aa8c4aca0d7ec1b
 100644
--- a/Documentation/es/usage/lilypond-book.itely
+++ b/Documentation/es/usage/lilypond-book.itely
@@ -1430,7 +1430,7 @@ del mismo archivo de salida de lilypond.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/fr/usage/lilypond-book.itely
diff --git a/Documentation/fr/usage/lilypond-book.itely 
b/Documentation/fr/usage/lilypond-book.itely
index 
277242dfeafa0394ef6e816c64f34e71953f9ac2..f8023ff53f4cdc74dc28e43011630dc1fbf11569
 100644
--- a/Documentation/fr/usage/lilypond-book.itely
+++ b/Documentation/fr/usage/lilypond-book.itely
@@ -1411,7 +1411,7 @@ comportant tous les mouvement de la partition.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/hu/usage/lilypond-book.itely
diff --git a/Documentation/hu/usage/lilypond-book.itely 
b/Documentation/hu/usage/lilypond-book.itely
index 
24268b3b054b7630864fe560321d918fdc4a884a..c32d316d4dea2b406e113ebbc11693d852bc0f6f
 100644
--- a/Documentation/hu/usage/lilypond-book.itely
+++ b/Documentation/hu/usage/lilypond-book.itely
@@ -1181,7 +1181,7 @@ output file.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/it/usage/lilypond-book.itely
diff --git a/Documentation/it/usage/lilypond-book.itely 
b/Documentation/it/usage/lilypond-book.itely
index 
060d9d68e916b3af068712306f5402b35b2832cf..066915cef3b24a27f56d1e06fb21eccb7b57ad1e
 100644
--- a/Documentation/it/usage/lilypond-book.itely
+++ b/Documentation/it/usage/lilypond-book.itely
@@ -1330,7 +1330,7 @@ di output di lilypond.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/ja/usage/lilypond-book.itely
diff --git a/Documentation/ja/usage/lilypond-book.itely 
b/Documentation/ja/usage/lilypond-book.itely
index 
160e68d4e448ec8379e52083abf9b00ea170d5f1..61c8b0da33c9dcdfe989d36542f67875d8ddbdb2
 100644
--- a/Documentation/ja/usage/lilypond-book.itely
+++ b/Documentation/ja/usage/lilypond-book.itely
@@ -1358,7 +1358,7 @@ unterst__tzt werden.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)
Index: Documentation/usage/lilypond-book.itely
diff --git a/Documentation/usage/lilypond-book.itely 
b/Documentation/usage/lilypond-book.itely
index 
9f4f00a93691390b807f0d735a610f5e88ad034c..8976114549a744d7cffd2710b93878c411a62eff
 100644
--- a/Documentation/usage/lilypond-book.itely
+++ b/Documentation/usage/lilypond-book.itely
@@ -1313,7 +1313,7 @@ output file.
              (formatted-toc-items (map format-line (toc-items)))
              (whole-string (string-join formatted-toc-items ",\n"))
              (output-name (ly:parser-output-name))
-             (outfilename (format "~a.toc" output-name))
+             (outfilename (format #f "~a.toc" output-name))
              (outfile (open-output-file outfilename)))
         (if (output-port? outfile)
             (display whole-string outfile)