X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fnotmuch-lib.el;h=4496ecd2733e632d1e10b44b16df948971c5f0f9;hp=da48bb86602dda774ea9f8bdb9725f13e7a48908;hb=99b6e780c8714f90f476e989e2d1cd973cf5bbb9;hpb=e1a700067a22214f54064c281219fbbbef87de06 diff --git a/emacs/notmuch-lib.el b/emacs/notmuch-lib.el index da48bb86..4496ecd2 100644 --- a/emacs/notmuch-lib.el +++ b/emacs/notmuch-lib.el @@ -611,7 +611,8 @@ the given type." ,@(and process-crypto '("--decrypt=true")) ,(notmuch-id-to-query (plist-get msg :id)))) (coding-system-for-read - (if binaryp 'no-conversion + (if binaryp + 'no-conversion (let ((coding-system (mm-charset-to-coding-system (plist-get part :content-charset)))) @@ -680,7 +681,8 @@ current buffer, if possible." ;; `gnus-decoded' charset. Otherwise, we'll fetch the binary ;; part content and let mm-* decode it. (let* ((have-content (plist-member part :content)) - (charset (if have-content 'gnus-decoded + (charset (if have-content + 'gnus-decoded (plist-get part :content-charset))) (handle (mm-make-handle (current-buffer) `(,content-type (charset . ,charset)))))