From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 11 Dec 2006 22:56:03 +0000 (+0100)
Subject: thinko.
X-Git-Tag: release/2.11.2-1~13
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=b92d0ffd27597a811edbc5c607b3321bf9e7b969;p=lilypond.git

thinko.
---

diff --git a/scm/ps-to-png.scm b/scm/ps-to-png.scm
index 2e124ae5ac..212029ed17 100644
--- a/scm/ps-to-png.scm
+++ b/scm/ps-to-png.scm
@@ -146,8 +146,8 @@
 		      (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))