changeset 92431:f154591879d5

(mm-decode-content-transfer-encoding): Simplify.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 03 Mar 2008 04:07:51 +0000
parents a7debc43cf9a
children 4fe0858e4c31
files lisp/gnus/ChangeLog lisp/gnus/mm-bodies.el
diffstat 2 files changed, 4 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Mon Mar 03 04:06:03 2008 +0000
+++ b/lisp/gnus/ChangeLog	Mon Mar 03 04:07:51 2008 +0000
@@ -1,5 +1,7 @@
 2008-03-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* mm-bodies.el (mm-decode-content-transfer-encoding): Simplify.
+
 	* gnus-sum.el: Use inhibit-read-only and with-current-buffer.
 	(gnus-summary-jump-to-group): Consider windows on other displayed frames as
 	well.  Similar changes might be needed elsewhere, but that's the one I've
--- a/lisp/gnus/mm-bodies.el	Mon Mar 03 04:06:03 2008 +0000
+++ b/lisp/gnus/mm-bodies.el	Mon Mar 03 04:07:51 2008 +0000
@@ -203,10 +203,7 @@
 	       (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 @@
 
 (provide 'mm-bodies)
 
-;;; arch-tag: 41104bb6-4443-4ca9-8d5c-ff87ecf27d8d
+;; arch-tag: 41104bb6-4443-4ca9-8d5c-ff87ecf27d8d
 ;;; mm-bodies.el ends here