From e96c179317fbb136d689438c7037bb248275d78f Mon Sep 17 00:00:00 2001 From: yoichi Date: Fri, 24 Feb 2006 00:16:00 +0000 Subject: [PATCH] * wl-draft.el (wl-draft-send-confirm): Bind wl-draft-send-hook to nil. --- wl/ChangeLog | 5 +++++ wl/wl-draft.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 880b16d..935eb1c 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2006-02-24 Yoichi NAKAYAMA + + * wl-draft.el (wl-draft-send-confirm): Bind wl-draft-send-hook + to nil. + 2006-02-23 Hiroya Murata * wl-summary.el (wl-summary-buffer-message-ring): New internal diff --git a/wl/wl-draft.el b/wl/wl-draft.el index a9c1ecf..5650ddc 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -1281,7 +1281,8 @@ This variable is valid when `wl-interactive-send' has non-nil value." (condition-case nil (progn (when wl-draft-send-confirm-with-preview - (wl-draft-preview-message)) + (let (wl-draft-send-hook) + (wl-draft-preview-message))) (save-excursion (goto-char (point-min)) ; to show recipients in header (funcall -- 1.7.10.4