From: kaoru <kaoru>
Date: Fri, 17 Jan 2003 12:12:10 +0000 (+0000)
Subject: * WL-MK (test-wl): Added `make-wl-news'.
X-Git-Tag: merged-trunk-to-elmo-mark-14~16
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1d7b88e089f7314fbd62b83d2d557753b260d27e;p=elisp%2Fwanderlust.git

* WL-MK (test-wl): Added `make-wl-news'.
(check-wl): Added (provide 'wl-news) before load wl-news.el.in.
---

diff --git a/ChangeLog b/ChangeLog
index 1d493de..4135398 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-01-17  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* WL-MK (test-wl): Added `make-wl-news'.
+	(check-wl): Added (provide 'wl-news) before load wl-news.el.in.
+
 2003-01-13  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* WL-MK (wl-info-lang): Skip "ja" for non-mule.
diff --git a/WL-MK b/WL-MK
index a31fd19..a3cd3a0 100644
--- a/WL-MK
+++ b/WL-MK
@@ -174,8 +174,8 @@
 (defun test-wl ()
   "Run test suite for developer."
   (config-wl-package)
+  (make-wl-news)
   (require 'lunit)
-  (require 'wl-news "wl-news.el.in")
   (let ((files (directory-files "tests" t "^test-.*\\.el$"))
 	(suite (lunit-make-test-suite)))
     (while files
@@ -192,8 +192,10 @@
 (defun check-wl ()
   "Check user environment.  Not for developer."
   (config-wl-package)
+  ;; Avoid load error
+  (provide 'wl-news)
+  (load "wl-news.el.in")
   (require 'lunit)
-  (require 'wl-news "wl-news.el.in")
   (let ((files (directory-files "tests" t "^check-.*\\.el$"))
 	(suite (lunit-make-test-suite)))
     (while files