From: kaoru <kaoru>
Date: Sun, 16 Dec 2001 06:50:38 +0000 (+0000)
Subject: * WL-MK (config-wl-package-subr): Added APEL version check.
X-Git-Tag: wl-2_8_0pre2~20
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ab42bd91e5f65967447a4dfcc95aa818c89a622a;p=elisp%2Fwanderlust.git

* WL-MK (config-wl-package-subr): Added APEL version check.
Changed check order; APEL, FLIM, SEMI.
---

diff --git a/ChangeLog b/ChangeLog
index 7733474..b3d3ea6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2001-12-16  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* WL-MK (config-wl-package-subr): Added APEL version check.
+	Changed check order; APEL, FLIM, SEMI.
+
 2001-12-15  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* INSTALL, INSTALL.ja: Added System Requirements.
diff --git a/WL-MK b/WL-MK
index 0026e0a..c4f181c 100644
--- a/WL-MK
+++ b/WL-MK
@@ -103,13 +103,17 @@
 	(setq load-path (cons (expand-file-name UTILSDIR) load-path)))
     (require 'install)
     (load "./WL-ELS" nil nil t)
-    (condition-case ()
-	(require 'mime-setup)
-      (error (error "No MIME module was detected.  Please install SEMI")))
+    ;; product.el version check
+    (require 'product)
+    (if (not (fboundp 'product-version-as-string))
+	(error "Please install new APEL.  See INSTALL or INSTALL.ja"))
     ;; smtp.el version check.
     (require 'smtp)
     (if (not (fboundp 'smtp-send-buffer))
-	(error "Please install new FLIM.  See INSTALL or INSTALL.ja"))))
+	(error "Please install new FLIM.  See INSTALL or INSTALL.ja"))
+    (condition-case ()
+	(require 'mime-setup)
+      (error (error "Cannot load `mime-setup'.  Please install SEMI")))))
 
 (defun config-wl-pixmap-dir (&optional packagedir)
   "Examine pixmap directory where icon files should go."