From: shuhei-k <shuhei-k>
Date: Mon, 10 Aug 1998 14:57:52 +0000 (+0000)
Subject: (mime-edit-normalize-body): Failed to canonicalize empty lines.
X-Git-Tag: semi-1_8_5~11
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=cc13cbfcefa6b3ef9aa289588c1bb199531f5966;p=elisp%2Fsemi.git

(mime-edit-normalize-body): Failed to canonicalize empty lines.
---

diff --git a/mime-edit.el b/mime-edit.el
index 0d28389..94ea968 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -2054,11 +2054,8 @@ Content-Transfer-Encoding: 7bit
 		  (save-restriction
 		    (narrow-to-region beg (mime-edit-content-end))
 		    (goto-char beg)
-		    (while (re-search-forward "\\([^\r]\\)\n" nil t)
-		      (replace-match
-		       (concat (buffer-substring (match-beginning 0)
-						 (match-end 1)) "\r\n"))
-		      )))
+		    (while (re-search-forward "\\(\\=\\|[^\r]\\)\n" nil t)
+		      (replace-match "\\1\r\n"))))
 	      (goto-char beg)
 	      (mime-encode-region beg (mime-edit-content-end) encoding)
 	      (mime-edit-define-encoding encoding)