Commits

Christian Kellermann  committed ccbf8a1

Use verbatim symbol for matching resouce type #:image

  • Participants
  • Parent commits 93f3df7

Comments (0)

Files changed (1)

   (when (not (file-exists? file))
     (error "Resource does not exist " file))
   (match type
-         (#:image
+         ('#:image
           (let* ((s (cairo-image-surface-create-from-png file))
                  (w (cairo-image-surface-get-width s))
                  (h (cairo-image-surface-get-height s))