Index: emacs/lisp/gnus/mm-bodies.el
diff -c emacs/lisp/gnus/mm-bodies.el:1.14 emacs/lisp/gnus/mm-bodies.el:1.15
*** emacs/lisp/gnus/mm-bodies.el:1.14 Sat Aug 6 19:51:42 2005
--- emacs/lisp/gnus/mm-bodies.el Mon Sep 5 23:58:08 2005
***************
*** 228,234 ****
nil))
(when (and
(memq encoding '(base64 x-uuencode x-uue x-binhex x-yenc))
! (equal type "text/plain"))
(goto-char (point-min))
(while (search-forward "\r\n" nil t)
(replace-match "\n" t t)))))
--- 228,234 ----
nil))
(when (and
(memq encoding '(base64 x-uuencode x-uue x-binhex x-yenc))
! (string-match "\\`text/" type))
(goto-char (point-min))
(while (search-forward "\r\n" nil t)
(replace-match "\n" t t)))))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
