From: yoichi <yoichi>
Date: Fri, 10 Jan 2003 09:43:05 +0000 (+0000)
Subject: 2003-01-10  Masahiro Murata  <muse@ba2.so-net.ne.jp>
X-Git-Tag: merged-trunk-to-elmo-mark-14~38
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=cfb5045f5601b67709297c0468053c858b8afcbb;p=elisp%2Fwanderlust.git

2003-01-10  Masahiro Murata  <muse@ba2.so-net.ne.jp>

	* wl-draft.el (wl-draft-reedit): Avoid error on Meadow [wl:11209].
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 475b0f7..654d178 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-10  Masahiro Murata  <muse@ba2.so-net.ne.jp>
+
+	* wl-draft.el (wl-draft-reedit): Avoid error on Meadow [wl:11209].
+
 2003-01-06  Mito  <mito@mxa.nes.nec.co.jp>
 
 	* wl-summary.el (wl-summary-line-list-info): Use %f to make
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 56955a9..138a4ca 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -1945,6 +1945,7 @@ If KILL-WHEN-DONE is non-nil, current draft buffer is killed"
 	       (error "Invalid value for wl-draft-buffer-style")))))
       (set-buffer buffer)
       (insert-file-contents-as-binary file-name)
+      (elmo-delete-cr-buffer)
       (let((mime-edit-again-ignored-field-regexp
 	    "^\\(Content-.*\\|Mime-Version\\):"))
 	(wl-draft-decode-message-in-buffer))