From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Tue, 16 Mar 2010 14:37:17 +0000 (+0100)
Subject: Do not crash trying to issue warning.  Fixes creating output read from stdin.
X-Git-Tag: release/2.13.17-1~67
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=426b22232f333fb511f0110cd376f73b54b68d2b;p=lilypond.git

Do not crash trying to issue warning.  Fixes creating output read from stdin.

This is a minimal fix, the default behaviour of producing PDF

    echo '{a b c}' | out/bin/lilypond -

still does not work.  What does work now is the PS output, eg

    echo '{a b c}' | out/bin/lilypond --ps -
---

diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm
index cf2eaa50e5..4cd6c29a7f 100644
--- a/scm/framework-ps.scm
+++ b/scm/framework-ps.scm
@@ -626,7 +626,7 @@ fonts inline."
 	 (w (if landscape paper-height paper-width))
 	 (h (if landscape paper-width paper-height)))
     (if (equal? (basename name ".ps") "-")
-	(ly:warning (_ "cannot convert <stdout> to ~S" "PDF"))
+	(ly:warning (_ "cannot convert <stdout> to ~S") "PDF")
 	(postscript->pdf w h name))))
 
 (define-public (convert-to-png book name)