From: kaoru <kaoru>
Date: Wed, 16 Aug 2000 04:35:47 +0000 (+0000)
Subject: * wl-draft.el (wl-user-agent-compose): Add (require 'wl) for
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=13e0ff49170710c6d5cc5177cb7b1971bd36a49c;p=elisp%2Fwanderlust.git

* wl-draft.el (wl-user-agent-compose): Add (require 'wl) for
use function `wl-string-match-assoc'.
---

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  <kaoru@kaisei.org>
+
+	* wl-draft.el (wl-user-agent-compose): Add (require 'wl) for
+	use function `wl-string-match-assoc'.
+
 2000-08-10  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* 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)