From a2dba1c2a62ce5c0f5ffeb69904f9b4674fbd89a Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Tue, 16 Mar 2010 15:47:29 +0100 Subject: [PATCH] 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). --- scm/framework-ps.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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 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)) -- 2.39.2