/[emacs]/emacs/lisp/gnus/mm-bodies.el
ViewVC logotype

Diff of /emacs/lisp/gnus/mm-bodies.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14 by ttn, Sat Aug 6 19:51:42 2005 UTC revision 1.15 by miles, Mon Sep 5 23:58:08 2005 UTC
# Line 228  If TYPE is `text/plain' CRLF->LF transla Line 228  If TYPE is `text/plain' CRLF->LF transla
228           nil))           nil))
229      (when (and      (when (and
230             (memq encoding '(base64 x-uuencode x-uue x-binhex x-yenc))             (memq encoding '(base64 x-uuencode x-uue x-binhex x-yenc))
231             (equal type "text/plain"))             (string-match "\\`text/" type))
232        (goto-char (point-min))        (goto-char (point-min))
233        (while (search-forward "\r\n" nil t)        (while (search-forward "\r\n" nil t)
234          (replace-match "\n" t t)))))          (replace-match "\n" t t)))))

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26