--- emacs.build/lisp/gnus/rfc2047.el	2005-10-23 00:27:52 +0600

+++ emacs.build/lisp/gnus/rfc2047.el.invalid	2005-10-23 00:35:43 +0600

@@ -808,7 +808,7 @@

 (eval-and-compile

   (defconst rfc2047-encoded-word-regexp

     "=\\?\\([^][\000-\040()<>@,\;:*\\\"/?.=]+\\)\\(\\*[^?]+\\)?\

-\\?\\(B\\|Q\\)\\?\\([!->@-~ ]*\\)\\?="))

+\\?\\(B\\|Q\\|b\\|q\\)\\?\\([!->@-~ ]*\\)\\?="))

 (defvar rfc2047-quote-decoded-words-containing-tspecials nil

   "If non-nil, quote decoded words containing special characters.")

@@ -861,9 +861,16 @@

 		   (cond ((char-equal ?B (nth 1 word))

 			  (setq text (base64-decode-string

 				      (rfc2047-pad-base64 (nth 2 word)))))

+			 ((char-equal ?b (nth 1 word))

+			  (setq text (base64-decode-string

+				      (rfc2047-pad-base64 (nth 2 word)))))

 			 ((char-equal ?Q (nth 1 word))

 			  (setq text (quoted-printable-decode-string

 				      (mm-subst-char-in-string

+				       ?_ ?  (nth 2 word) t))))

+			 ((char-equal ?q (nth 1 word))

+			  (setq text (quoted-printable-decode-string

+				      (mm-subst-char-in-string

 				       ?_ ?  (nth 2 word) t)))))

 		 (error

 		  (message "%s" (error-message-string code))