From 647c2509897e8a7cf12dba1a6ee81f8bb6e53b4d Mon Sep 17 00:00:00 2001 From: David Edmondson Date: Fri, 13 Jan 2012 09:44:46 +0000 Subject: notmuch/emacs: Observe the charset of text/html parts, where known. Add the charset of text/html parts to the JSON output of 'notmuch -show' when it is known. Observe the encoding when rendering such parts in emacs. --- emacs/notmuch-show.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'emacs/notmuch-show.el') diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index 2806879e..034db87e 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -328,7 +328,8 @@ message at DEPTH in the current thread." current buffer, if possible." (let ((display-buffer (current-buffer))) (with-temp-buffer - (let ((handle (mm-make-handle (current-buffer) (list content-type)))) + (let* ((charset (plist-get part :content-charset)) + (handle (mm-make-handle (current-buffer) `(,content-type (charset . ,charset))))) (if (and (mm-inlinable-p handle) (mm-inlined-p handle)) (let ((content (notmuch-show-get-bodypart-content msg part nth))) -- cgit v1.2.3