projects
/
lilypond.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
a2dba1c
)
Processing stdin: same for --png: rename "-" to "./-".
author
Jan Nieuwenhuizen
<janneke@gnu.org>
Tue, 16 Mar 2010 14:48:07 +0000
(15:48 +0100)
committer
Jan Nieuwenhuizen
<janneke@gnu.org>
Tue, 16 Mar 2010 14:48:07 +0000
(15:48 +0100)
scm/framework-ps.scm
patch
|
blob
|
history
diff --git
a/scm/framework-ps.scm
b/scm/framework-ps.scm
index 9bf7938ead52dcdf5dee01af893cb24719abaa70..fcd3604d1671337471291e26d8b561e57fe03fd4 100644
(file)
--- a/
scm/framework-ps.scm
+++ b/
scm/framework-ps.scm
@@
-638,6
+638,8
@@
fonts inline."
(paper-width (ly:output-def-lookup defs 'paper-width))
(paper-height (ly:output-def-lookup defs 'paper-height))
(output-scale (ly:output-def-lookup defs 'output-scale)))
+ (if (equal? (basename name ".ps") "-")
+ (set! name (string-append "./" name)))
(postscript->png resolution
(* paper-width output-scale (/ (ly:bp 1)))
(* paper-height output-scale (/ (ly:bp 1)))