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)