Synch with trunk.

diff --git a/tests/ChangeLog b/tests/ChangeLog
index bd2a9b8..932911f 100644 (file)
--- a/tests/ChangeLog
+++ b/tests/ChangeLog
@@ -1,3 +1,13 @@
+2003-01-17  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * test-dist.el (test-wl-modules-exists): Fix void variable.
+       (test-elmo-modules-exists): Ditto.
+
+2003-01-12  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * check-modules.el (check-modules-semi-mime-edit): Check
+       `mime-create-tag'.
+
 2003-01-06  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
        * test-dist.el (test-wl-demo-copyright-notice): Check always.

diff --git a/tests/check-modules.el b/tests/check-modules.el
index 1b1744c..6c65a95 100644 (file)
--- a/tests/check-modules.el
+++ b/tests/check-modules.el
@@ -125,7 +125,8 @@
   (lunit-assert (fboundp 'mime-find-file-type))
   (lunit-assert (fboundp 'mime-edit-content-beginning))
   (lunit-assert (fboundp 'mime-edit-content-end))
-  (lunit-assert (fboundp 'mime-edit-preview-message)))
+  (lunit-assert (fboundp 'mime-edit-preview-message))
+  (lunit-assert (fboundp 'mime-create-tag)))
 
 (luna-define-method check-modules-semi-mime-view ((case check-modules))
   (require 'mime-view)

diff --git a/tests/test-dist.el b/tests/test-dist.el
index 4a00833..5b276aa 100644 (file)
--- a/tests/test-dist.el
+++ b/tests/test-dist.el
@@ -13,7 +13,7 @@
        (lambda (module)
         (setq filename (concat (symbol-name module) ".el"))
         (unless (file-exists-p (expand-file-name filename WLDIR))
-          (add-to-list 'lost symbol)))
+          (add-to-list 'lost filename)))
        WL-MODULES)
       lost))))
 
@@ -26,7 +26,7 @@
        (lambda (module)
         (setq filename (concat (symbol-name module) ".el"))
         (unless (file-exists-p (expand-file-name filename ELMODIR))
-          (add-to-list 'lost symbol)))
+          (add-to-list 'lost filename)))
        ELMO-MODULES)
       lost))))