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 (file)
--- 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 (file)
--- 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)