Oops, settings are strings here.

diff --git a/scm/backend-library.scm b/scm/backend-library.scm
index 02cd759ff9e608aba19f72fcd034a33eae2f5651..6e45f05c6f21af39da55a97775b0217c09615335 100644 (file)
--- 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