view: Treat image attachments as binaries.
authorRicardo Wurmus <rekado@elephly.net>
Mon, 28 Jan 2019 22:55:39 +0000 (23:55 +0100)
committerRicardo Wurmus <rekado@elephly.net>
Mon, 28 Jan 2019 22:55:39 +0000 (23:55 +0100)
* mumi/web/view/utils.scm (display-message-body): Handle attachments
of type "image" like any other binary attachment.

mumi/web/view/utils.scm

index 584b9a9..bdecc14 100644 (file)
@@ -124,7 +124,8 @@ BUG-NUM), even when it is a multipart message."
                  content-type
                  (assoc-ref content-type 'type)))
            (binary-attachment? (and attachment?
-                                    (eq? (assoc-ref content-type 'type) 'application)))
+                                    (member (assoc-ref content-type 'type)
+                                            '(application image))))
            (attachment-name
             (or (and=> (assoc-ref headers 'content-disposition)
                        (cut assoc-ref <> 'filename))