mu4e: use builtin function "shr-render-region" for simplicity
This commit is contained in:
@ -268,7 +268,7 @@ point in eiter the headers buffer or the view buffer."
|
|||||||
"Html to text using the shr engine; this can be used in
|
"Html to text using the shr engine; this can be used in
|
||||||
`mu4e-html2text-command' in a new enough emacs. Based on code by
|
`mu4e-html2text-command' in a new enough emacs. Based on code by
|
||||||
Titus von der Malsburg."
|
Titus von der Malsburg."
|
||||||
(interactive)
|
(interactive)
|
||||||
(let (
|
(let (
|
||||||
;; When HTML emails contain references to remote images,
|
;; When HTML emails contain references to remote images,
|
||||||
;; retrieving these images leaks information. For example,
|
;; retrieving these images leaks information. For example,
|
||||||
@ -277,8 +277,7 @@ Titus von der Malsburg."
|
|||||||
;; to not retrieve images.
|
;; to not retrieve images.
|
||||||
;; See this discussion on mu-discuss:
|
;; See this discussion on mu-discuss:
|
||||||
;; https://groups.google.com/forum/#!topic/mu-discuss/gr1cwNNZnXo
|
;; https://groups.google.com/forum/#!topic/mu-discuss/gr1cwNNZnXo
|
||||||
(shr-inhibit-images t))
|
(shr-inhibit-images t))
|
||||||
(erase-buffer)
|
|
||||||
(shr-render-region (point-min) (point-max))
|
(shr-render-region (point-min) (point-max))
|
||||||
(goto-char (point-min))))
|
(goto-char (point-min))))
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user