From: okada <okada>
Date: Tue, 4 Jul 2000 03:11:08 +0000 (+0000)
Subject: * wl-draft.el (wl-draft-edit-string): Call
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=30f7cea11272803a8bb73b36ee525bb916e3917e;p=elisp%2Fwanderlust.git

* wl-draft.el (wl-draft-edit-string): Call
`wl-draft-reedit-hook' instead of `wl-mail-setup-hook'.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 4face20..a237aef 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2000-07-04  Kenichi OKADA	<okada@opaopa.org>
+
+	* wl-draft.el (wl-draft-edit-string): Call
+	`wl-draft-reedit-hook' instead of `wl-mail-setup-hook'.
+
 2000-07-03  Katsumi Yamaoka    <yamaoka@jpl.org>
 
 	* wl-demo.el (wl-demo): Hide scroll bars, etc. first.
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 0259934..00ad3a2 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -521,7 +521,7 @@ the `wl-smtp-features' variable."
       (delete-other-windows)
       (kill-buffer tmp-buf)))
   (setq buffer-read-only nil) ;;??
-  (run-hooks 'wl-mail-setup-hook))
+  (run-hooks 'wl-draft-reedit-hook))
 
 (defun wl-draft-insert-current-message (dummy)
   (interactive)