diff options
| author | Miles Bader <miles@gnu.org> | 2008-02-24 15:23:45 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2008-02-24 15:23:45 +0000 |
| commit | f5490ddcb4374e73c07a5729b4cfd7fbffd8b60a (patch) | |
| tree | 2f080ea4ce2029a6a24c8456d00f449b805f0f32 /lisp/gnus/mm-bodies.el | |
| parent | 2a36efcfc245388b81913d2b192ee9ca74cb4a04 (diff) | |
| download | emacs-f5490ddcb4374e73c07a5729b4cfd7fbffd8b60a.tar.gz | |
Revert removal of `mm-hack-charsets' in Gnus
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1076
Diffstat (limited to 'lisp/gnus/mm-bodies.el')
| -rw-r--r-- | lisp/gnus/mm-bodies.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/mm-bodies.el b/lisp/gnus/mm-bodies.el index be209a3e004..90d4acbdcd7 100644 --- a/lisp/gnus/mm-bodies.el +++ b/lisp/gnus/mm-bodies.el @@ -104,7 +104,8 @@ If no encoding was done, nil is returned." (mm-charset-to-coding-system charset)) charset) (goto-char (point-min)) - (let ((charsets (mm-find-mime-charset-region (point-min) (point-max)))) + (let ((charsets (mm-find-mime-charset-region (point-min) (point-max) + mm-hack-charsets))) (cond ;; No encoding. ((null charsets) |