From cc4068bf74c1b1afc2f5a01decda29807d007d8f Mon Sep 17 00:00:00 2001 From: kaoru Date: Tue, 19 Feb 2008 20:02:00 +0000 Subject: [PATCH] * wl-mime.el (wl-define-dummy-functions): Split `eval-when-compile' form for avoid error; when `make compile-strict. --- wl/ChangeLog | 4 ++++ wl/wl-mime.el | 5 ++++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index ae3cc65..10dbfe5 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,5 +1,9 @@ 2008-02-19 TAKAHASHI Kaoru + * wl-mime.el (wl-define-dummy-functions): Split + `eval-when-compile' form for avoid error; when `make + compile-strict. + * wl-util.el: Move (eval-when-compile (require 'static)). * wl-dnd.el: Add (eval-when-compile (require 'static)). * wl-message.el: Ditto. diff --git a/wl/wl-mime.el b/wl/wl-mime.el index 540f87d..96d6c62 100644 --- a/wl/wl-mime.el +++ b/wl/wl-mime.el @@ -484,8 +484,11 @@ It calls following-method selected from variable (eval-when-compile (defmacro wl-define-dummy-functions (&rest symbols) `(dolist (symbol (quote ,symbols)) - (defalias symbol 'ignore))) + (defalias symbol 'ignore)))) +(eval-when-compile + ;; split eval-when-compile form for avoid error on `make compile-strict' + (require 'mime-pgp) (condition-case nil (require 'epa) (error -- 1.7.10.4