From: morioka <morioka>
Date: Wed, 2 Jul 1997 16:20:22 +0000 (+0000)
Subject: (mime-decode-text-body): Canonicalize line break code.
X-Git-Tag: semi-0_96~21
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c00487eeb2c3bab6498ea19e8b68b71459503391;p=elisp%2Fsemi.git

(mime-decode-text-body): Canonicalize line break code.
---

diff --git a/mime-text.el b/mime-text.el
index 63bb213..0e705f7 100644
--- a/mime-text.el
+++ b/mime-text.el
@@ -3,8 +3,7 @@
 ;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version:
-;;	$Id: mime-text.el,v 0.23 1997-04-03 17:39:31 morioka Exp $
+;; Version: $Id: mime-text.el,v 0.24 1997-07-02 16:20:22 morioka Exp $
 ;; Keywords: text, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -86,6 +85,10 @@ CHARSET.  CHARSET is SYMBOL and ENCODING is nil or STRING.
 It calls text decoder for MIME charset specified by buffer local
 variable `mime-text-decoder' and variable `mime-text-decoder-alist'."
   (mime-decode-region (point-min) (point-max) encoding)
+  (goto-char (point-min))
+  (while (search-forward "\r\n" nil t)
+    (replace-match "\n")
+    )
   (let ((text-decoder
 	 (save-excursion
 	   (set-buffer mime-raw-buffer)