summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2019-01-28 23:55:39 +0100
committerRicardo Wurmus <rekado@elephly.net>2019-01-28 23:55:39 +0100
commitb30a97300f072e06839ae5c04bbdc1f81ae3c986 (patch)
tree2f4b9110b1fdd4076c972c38b77b0a1ffaaf21ba
parent806a61a5b47a3c17511319dc145063d8caff2b09 (diff)
view: Treat image attachments as binaries.
* mumi/web/view/utils.scm (display-message-body): Handle attachments of type "image" like any other binary attachment.
-rw-r--r--mumi/web/view/utils.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/mumi/web/view/utils.scm b/mumi/web/view/utils.scm
index 584b9a9..bdecc14 100644
--- a/mumi/web/view/utils.scm
+++ b/mumi/web/view/utils.scm
@@ -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))