From 6ae98c975663506c74c2fc9d04e0a37faa7d8bae Mon Sep 17 00:00:00 2001 From: yoichi Date: Fri, 8 Nov 2002 05:34:11 +0000 Subject: [PATCH] * wl-draft.el (wl-user-agent-compose): Set wl-draft-buffer-style as `keep' unless switch-function. --- wl/ChangeLog | 5 +++++ wl/wl-draft.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/wl/ChangeLog b/wl/ChangeLog index d0f38de..051c7ce 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2002-11-08 Yoichi NAKAYAMA + + * wl-draft.el (wl-user-agent-compose): Set wl-draft-buffer-style + as `keep' unless switch-function. + 2002-11-07 Yoichi NAKAYAMA * wl-draft.el (wl-draft-create-buffer): Rewrite the part to hide diff --git a/wl/wl-draft.el b/wl/wl-draft.el index 38f691b..77de35a 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -2400,6 +2400,8 @@ been implemented yet. Partial support for SWITCH-FUNCTION now supported." (unless (featurep 'wl) (require 'wl)) + (or switch-function + (setq switch-function 'keep)) ;; protect these -- to and subject get bound at some point, so it looks ;; to be necessary to protect the values used w/in (let ((wl-user-agent-headers-and-body-alist other-headers) -- 1.7.10.4