emacs/mu
1
0
Fork 0
mirror of https://github.com/djcb/mu.git synced 2024-06-20 06:46:50 +02:00
Code Issues Releases Wiki Activity

Let not be stuck into *mu4e-output* after rendering html. Reduce by one levels of (with-temp-buffer.

Browse Source
This commit is contained in:
Jean Schurger 2015-02-05 10:42:45 -05:00
parent a958390bbf
commit 783cfae414
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
mu4e/mu4e-message.el
View File

@ -177,15 +177,17 @@ be changed by setting `mu4e-view-prefer-html'."
(with-temp-buffer
(insert html)
(cond
((stringp mu4e-html2text-command)
(let* ((tmp-file (make-temp-file "mu4e-html")))
(write-region (point-min) (point-max) tmp-file)
(mu4e-process-file-through-pipe tmp-file mu4e-html2text-command)
(delete-file tmp-file)))
((stringp mu4e-html2text-command)
(let* ((tmp-file (make-temp-file "mu4e-html")))
(write-region (point-min) (point-max) tmp-file)
(erase-buffer)
(call-process-shell-command mu4e-html2text-command tmp-file t t)
(delete-file tmp-file)))
((functionp mu4e-html2text-command)
(funcall mu4e-html2text-command))
(t (mu4e-error "Invalid `mu4e-html2text-command'")))
(buffer-string)))
(buffer-string))
)
(t ;; otherwise, an empty body
""))))
;; and finally, remove some crap from the remaining string; it seems