summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-art.el
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen <larsi@gnus.org>2012-04-11 22:31:16 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2012-04-11 22:31:16 +0000
commitdc2ab667ae97f2194f5a258084e0dd96eb064bff (patch)
tree78468b098e5049cb027700a35ef6f99007cf23c5 /lisp/gnus/gnus-art.el
parent4517fe3a47700373d03fb389ff038572a1144f5b (diff)
downloademacs-dc2ab667ae97f2194f5a258084e0dd96eb064bff.tar.gz
gnus-art.el (article-wash-html): Fix non-ASCII characters when washing HTML (bug#7410).
gnus-msg.el (gnus-inews-insert-gcc): Protect against when we don't have a group name. gnus-start.el (gnus-read-newsrc-el-file): Protect against broken .newsrc.el files.
Diffstat (limited to 'lisp/gnus/gnus-art.el')
-rw-r--r--lisp/gnus/gnus-art.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 048f8956567..b04615dc5a9 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -2754,9 +2754,11 @@ If READ-CHARSET, ask for a coding system."
(let ((handles nil)
(buffer-read-only nil))
(when (gnus-buffer-live-p gnus-original-article-buffer)
- (setq handles (mm-dissect-buffer t t)))
+ (with-current-buffer gnus-original-article-buffer
+ (setq handles (mm-dissect-buffer t t))))
(article-goto-body)
(delete-region (point) (point-max))
+ (mm-enable-multibyte)
(mm-inline-text-html handles)))
(defvar gnus-article-browse-html-temp-list nil