From 13e0ff49170710c6d5cc5177cb7b1971bd36a49c Mon Sep 17 00:00:00 2001 From: kaoru Date: Wed, 16 Aug 2000 04:35:47 +0000 Subject: [PATCH] * wl-draft.el (wl-user-agent-compose): Add (require 'wl) for use function `wl-string-match-assoc'. --- wl/ChangeLog | 5 +++++ wl/wl-draft.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/wl/ChangeLog b/wl/ChangeLog index 014dc5c..dd461b8 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2000-08-16 TAKAHASHI Kaoru + + * wl-draft.el (wl-user-agent-compose): Add (require 'wl) for + use function `wl-string-match-assoc'. + 2000-08-10 Yuuichi Teranishi * wl-vars.el (wl-draft-remove-group-list-contents): New user option. diff --git a/wl/wl-draft.el b/wl/wl-draft.el index 481b87b..c47a289 100644 --- a/wl/wl-draft.el +++ b/wl/wl-draft.el @@ -1925,6 +1925,8 @@ Only support for TO, SUBJECT, and OTHER-HEADERS has been implemented. Support for CONTINUE, YANK-ACTION, and SEND-ACTIONS has not been implemented yet. Partial support for SWITCH-FUNCTION now supported." + (unless (featurep 'wl) + (require 'wl)) ;; 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