diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-03 04:07:51 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-03-03 04:07:51 +0000 |
| commit | a88fd51a1fe1f5a89e428269a4761d84912e57c2 (patch) | |
| tree | 8956c710b50b61eaf1edfd6a5b921aa773cbf86d /lisp/gnus/mm-bodies.el | |
| parent | c7a91ce13240d429d2187d5b494594e3e4b7efc8 (diff) | |
| download | emacs-a88fd51a1fe1f5a89e428269a4761d84912e57c2.tar.gz emacs-a88fd51a1fe1f5a89e428269a4761d84912e57c2.tar.bz2 emacs-a88fd51a1fe1f5a89e428269a4761d84912e57c2.zip | |
(mm-decode-content-transfer-encoding): Simplify.
Diffstat (limited to 'lisp/gnus/mm-bodies.el')
| -rw-r--r-- | lisp/gnus/mm-bodies.el | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lisp/gnus/mm-bodies.el b/lisp/gnus/mm-bodies.el index 90d4acbdcd7..208c35f72bc 100644 --- a/lisp/gnus/mm-bodies.el +++ b/lisp/gnus/mm-bodies.el @@ -203,10 +203,7 @@ If TYPE is `text/plain' CRLF->LF translation may occur." (when (re-search-backward "^[A-Za-z0-9+/]+=*[\t ]*$" nil t) (forward-line)) (point)))) - ((memq encoding '(7bit 8bit binary)) - ;; Do nothing. - t) - ((null encoding) + ((memq encoding '(nil 7bit 8bit binary)) ;; Do nothing. t) ((memq encoding '(x-uuencode x-uue)) @@ -307,5 +304,5 @@ decoding. If it is nil, default to `mail-parse-charset'." (provide 'mm-bodies) -;;; arch-tag: 41104bb6-4443-4ca9-8d5c-ff87ecf27d8d +;; arch-tag: 41104bb6-4443-4ca9-8d5c-ff87ecf27d8d ;;; mm-bodies.el ends here |