From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Tue, 16 Mar 2010 14:47:29 +0000 (+0100)
Subject: Processing stdin: instead of warn, rename "-" to "./-".  Fixes PDF from stdin.
X-Git-Tag: release/2.13.17-1~66
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a2dba1c2a62ce5c0f5ffeb69904f9b4674fbd89a;p=lilypond.git

Processing stdin: instead of warn, rename "-" to "./-".  Fixes PDF from stdin.

This is still not a pseudo-filter, instead of a PDF (or PS) on stdout,

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

now produces a file `-.pdf' (or with --ps flag `-.ps' is produced).
---

diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm
index 4cd6c29a7f..9bf7938ead 100644
--- a/scm/framework-ps.scm
+++ b/scm/framework-ps.scm
@@ -626,8 +626,8 @@ 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")
-	(postscript->pdf w h name))))
+	(set! name (string-append "./" name)))
+    (postscript->pdf w h name)))
 
 (define-public (convert-to-png book name)
   (let* ((defs (ly:paper-book-paper book))