X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fframework-eps.scm;h=60d468a123d708019585762670cf8ad203bfdbbe;hb=HEAD;hp=353d5f8f913ee4e7c127fd93226ec045e1ce9467;hpb=c054eb280fd9953596eb164f67b0f9d5555c5a32;p=lilypond.git diff --git a/scm/framework-eps.scm b/scm/framework-eps.scm index 353d5f8f91..60d468a123 100644 --- a/scm/framework-eps.scm +++ b/scm/framework-eps.scm @@ -83,8 +83,10 @@ alignment." ;; First, create the output, then if necessary, individual staves and ;; finally write some auxiliary files if desired (dump-infinite-stack-EPS stencils) - (postprocess-output book framework-eps-module - (format #f "~a.eps" basename) (ly:output-formats)) + (postprocess-output book framework-eps-module (ly:output-formats) + basename + (format #f "~a.eps" basename) + #t) ;; individual staves (*-1.eps etc.); only print if more than one stencil ;; Otherwise the .eps and the -1.eps file will be identical and waste space @@ -95,7 +97,9 @@ alignment." (eps-files (map dump-counted-stencil counted-systems))) (if do-pdf ;; par-for-each: a bit faster ... - (for-each (lambda (y) (postscript->pdf 0 0 y)) + (for-each (lambda (y) (postscript->pdf 0 0 + (dir-basename y ".eps") + y #t)) eps-files)))) ;; Now, write some aux files if requested: .texi, .tex and .count