Parent Directory | Revision Log | 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))))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |