Merge pull request #1375 from Chris00/display-draft
mu4e: properly display messages in the draft folder (with gnus)
This commit is contained in:
@ -360,16 +360,17 @@ article-mode."
|
|||||||
(switch-to-buffer (get-buffer-create mu4e~view-buffer-name))
|
(switch-to-buffer (get-buffer-create mu4e~view-buffer-name))
|
||||||
(erase-buffer)
|
(erase-buffer)
|
||||||
(unless marked-read
|
(unless marked-read
|
||||||
;; when we're being marked as read, no need to start rendering the messages; just the minimal
|
;; when we're being marked as read, no need to start rendering
|
||||||
;; so (update... ) can find us.
|
;; the messages; just the minimal so (update... ) can find us.
|
||||||
(mm-disable-multibyte)
|
|
||||||
(insert-file-contents-literally path)
|
(insert-file-contents-literally path)
|
||||||
|
(unless (message-fetch-field "Content-Type" t)
|
||||||
|
;; For example, for messages in `mu4e-drafts-folder'
|
||||||
|
(let ((coding (or (default-value 'buffer-file-coding-system)
|
||||||
|
'prefer-utf-8)))
|
||||||
|
(recode-region (point-min) (point-max) coding 'no-conversion)))
|
||||||
(setq
|
(setq
|
||||||
gnus-summary-buffer (get-buffer-create " *appease-gnus*")
|
gnus-summary-buffer (get-buffer-create " *appease-gnus*")
|
||||||
gnus-original-article-buffer (current-buffer))
|
gnus-original-article-buffer (current-buffer))
|
||||||
(mm-enable-multibyte)
|
|
||||||
(article-de-base64-unreadable)
|
|
||||||
(article-de-quoted-unreadable)
|
|
||||||
(run-hooks 'gnus-article-decode-hook)
|
(run-hooks 'gnus-article-decode-hook)
|
||||||
(gnus-article-prepare-display)
|
(gnus-article-prepare-display)
|
||||||
(mu4e-view-mode)
|
(mu4e-view-mode)
|
||||||
|
|||||||
Reference in New Issue
Block a user