From 99728a37cd314d1ed07d1cf365db1eeb9816ba32 Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 20 May 2002 14:49:36 +0000 Subject: [PATCH] (wl-draft-do-mime-bcc): Use wl-from for From field value. --- wl/ChangeLog | 3 ++- wl/wl-draft.el | 1 + 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 547409c..8189950 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,10 +1,11 @@ -2002-05-20 Yuuichi Teranishi +2002-05-20 Yuuichi Teranishi * wl-draft.el (wl-draft-do-mime-bcc): Use generate-new-buffer and insert-buffer instead of clone-buffer. (wl-draft-doing-mime-bcc): New variable. (wl-draft-do-mime-bcc): Bind wl-draft-doing-mime-bcc to avoid infinite loop. + (wl-draft-do-mime-bcc): Use wl-from for From field value. * wl-vars.el (wl-draft-mime-bcc-field-name): New user option. (wl-draft-mime-bcc-body): Ditto. diff --git a/wl/wl-draft.el b/wl/wl-draft.el index 0c32b6c..5ef8bc2 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -1315,6 +1315,7 @@ If KILL-WHEN-DONE is non-nil, current draft buffer is killed" (setq major-mode 'wl-draft-mode) (wl-draft-create-contents (append `((To . ,recipient) + (From . ,wl-from) (Subject . ,(concat "A blind carbon copy (" orig-subj ")"))) -- 1.7.10.4