]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/ps-to-png.scm
Merge branch 'jneeman' of git+ssh://jneem@git.sv.gnu.org/srv/git/lilypond into jneeman
[lilypond.git] / scm / ps-to-png.scm
index 2e124ae5acd4915d9beb404981f13d14955297cf..2d429886f30b24ffd0b3f7bef81250e351b9b0f5 100644 (file)
     (rename-file file old)
     (my-system be-verbose
               #t
-              (format #f "convert -scale \"~a%\" ~a ~a" percentage old file))
+              (format #f "convert -scale \"~a%\" -depth 8 ~a ~a" percentage old file))
     (delete-file old)
     ))
 
                      (else
                       (ly:error "Unknown pixmap format ~a" pixmap-format))))
          (base (basename (re-sub "[.]e?ps" "" ps-name)))
-         (png1 (format "~a.~a" base pixmap-format))
-         (pngn (format  "~a-page%d.~a" base pixmap-format))
+         (png1 (format "~a.~a" base extension))
+         (pngn (format  "~a-page%d.~a" base extension))
          (page-count (ps-page-count ps-name))
          (multi-page? (> page-count 1))
          (output-file (if multi-page? pngn png1))