summaryrefslogtreecommitdiff
path: root/lisp/gnus/rfc2047.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2006-04-11 23:22:06 +0000
committerMiles Bader <miles@gnu.org>2006-04-11 23:22:06 +0000
commit14e6dc54f295e1fbc92f6e22a5bb8b5f9a4b83ac (patch)
tree9eb6b17863e4092596065cfa81a56ad7b433a818 /lisp/gnus/rfc2047.el
parent8a8f8697fe793055cf10c6081de7c5675151ed1e (diff)
downloademacs-14e6dc54f295e1fbc92f6e22a5bb8b5f9a4b83ac.tar.gz
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-210
Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 81-82) - Update from CVS
Diffstat (limited to 'lisp/gnus/rfc2047.el')
-rw-r--r--lisp/gnus/rfc2047.el7
1 files changed, 2 insertions, 5 deletions
diff --git a/lisp/gnus/rfc2047.el b/lisp/gnus/rfc2047.el
index c89528a30db..aa30d9ba783 100644
--- a/lisp/gnus/rfc2047.el
+++ b/lisp/gnus/rfc2047.el
@@ -851,11 +851,8 @@ ENCODED-WORD)."
(let (word charset cs encoding text rest)
(while words
(setq word (pop words))
- (if (and (or (setq cs (rfc2047-charset-to-coding-system
- (setq charset (car word))))
- (progn
- (message "Unknown charset: %s" charset)
- nil))
+ (if (and (setq cs (rfc2047-charset-to-coding-system
+ (setq charset (car word))))
(condition-case code
(cond ((char-equal ?B (nth 1 word))
(setq text (base64-decode-string