From dba2045f31a145885c7071b74557f5a9447bc772 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Sun, 17 Dec 2006 15:28:54 +0100 Subject: [PATCH] Oops, settings are strings here. --- scm/backend-library.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scm/backend-library.scm b/scm/backend-library.scm index 02cd759ff9..6e45f05c6f 100644 --- a/scm/backend-library.scm +++ b/scm/backend-library.scm @@ -105,12 +105,12 @@ ;; (string-append (basename name ".ps") "-page1.png" ))) (let* ((verbose (ly:get-option 'verbose)) (rename-page-1 #f) - (pixmap-default 'png16m) + (pixmap-default "png16m") (pixmap-setting (ly:get-option 'pixmap-format)) - (pixmap-format (if (or (not (eq pixmap-setting pixmap-default)) + (pixmap-format (if (or (not (equal? pixmap-setting pixmap-default)) (ps-has-color name)) pixmap-setting - 'pnggray))) + "pnggray"))) (ly:message (_ "Converting to ~a...") "PNG") (make-ps-images name #:resolution resolution -- 2.39.5