From 79b879cec761830d03425545782bbe97e0f65dc1 Mon Sep 17 00:00:00 2001 From: kaoru Date: Tue, 19 Feb 2008 01:18:57 +0000 Subject: [PATCH] Add (eval-when-compile (require 'cl)). --- wl/ChangeLog | 7 +++++++ wl/wl-address.el | 1 + wl/wl-addrmgr.el | 1 + wl/wl-mime.el | 1 + wl/wl-util.el | 2 ++ 5 files changed, 12 insertions(+) diff --git a/wl/ChangeLog b/wl/ChangeLog index 5fca710..e9367f5 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,10 @@ +2008-02-19 TAKAHASHI Kaoru + + * wl-address.el: Add (eval-when-compile (require 'cl)). + * wl-addrmgr.el: Ditto. + * wl-mime.el: Ditto. + * wl-util.el: Ditto. + 2008-02-18 TAKAHASHI Kaoru * wl.el (wl-plugged-toggle): Use `string-to-number' instead of diff --git a/wl/wl-address.el b/wl/wl-address.el index d41537d..69abb20 100644 --- a/wl/wl-address.el +++ b/wl/wl-address.el @@ -36,6 +36,7 @@ (require 'wl-util) (require 'wl-vars) (require 'std11) +(eval-when-compile (require 'cl)) (defvar wl-address-complete-header-list '("To:" "From:" "Cc:" "Bcc:" "Mail-Followup-To:" "Reply-To:" diff --git a/wl/wl-addrmgr.el b/wl/wl-addrmgr.el index 4c121a8..5c27f35 100644 --- a/wl/wl-addrmgr.el +++ b/wl/wl-addrmgr.el @@ -34,6 +34,7 @@ (require 'wl-address) (require 'wl-draft) +(eval-when-compile (require 'cl)) ;; Variables (defgroup wl-addrmgr nil diff --git a/wl/wl-mime.el b/wl/wl-mime.el index 80d8b51..c8a798e 100644 --- a/wl/wl-mime.el +++ b/wl/wl-mime.el @@ -33,6 +33,7 @@ (require 'mime-play) (require 'elmo) (require 'wl-vars) +(eval-when-compile (require 'cl)) ;;; Draft diff --git a/wl/wl-util.el b/wl/wl-util.el index 6869de5..610a615 100644 --- a/wl/wl-util.el +++ b/wl/wl-util.el @@ -35,10 +35,12 @@ (require 'bytecomp) (require 'elmo-util) (require 'elmo-flag) +(require 'wl-vars) (condition-case nil (require 'pp) (error nil)) (eval-when-compile + (require 'cl) (require 'time-stamp) (defalias-maybe 'next-command-event 'ignore) (defalias-maybe 'event-to-character 'ignore) -- 1.7.10.4