From: yoichi <yoichi>
Date: Sat, 20 Jul 2002 22:41:37 +0000 (+0000)
Subject: Merge following change from main trunk.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=72a0418f9a6ad1fd47172af6ff12718ec025939b;p=elisp%2Fwanderlust.git

Merge following change from main trunk.
 * wl-draft.el (wl-draft-edit-string): Don't set buffer-read-only.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 0b15650..42936b9 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2002-07-18  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
+
+	* wl-draft.el (wl-draft-edit-string): Don't set buffer-read-only.
+
 2001-12-27  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* 2.8.1 is released.
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index ac95b99..881a8f1 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -516,7 +516,7 @@ Reply to author if WITH-ARG is non-nil."
 	(tmp-buf (get-buffer-create " *wl-draft-edit-string*"))
 	to subject in-reply-to cc references newsgroups mail-followup-to
 	content-type content-transfer-encoding from
-	body-beg buffer-read-only)
+	body-beg)
     (set-buffer tmp-buf)
     (erase-buffer)
     (insert string)
@@ -566,7 +566,6 @@ Reply to author if WITH-ARG is non-nil."
       (and to (mail-position-on-field "To"))
       (delete-other-windows)
       (kill-buffer tmp-buf)))
-  (setq buffer-read-only nil) ;;??
   (run-hooks 'wl-draft-reedit-hook))
 
 (defun wl-draft-insert-current-message (dummy)