From: kaoru <kaoru>
Date: Sun, 24 Dec 2000 10:19:11 +0000 (+0000)
Subject: Fix last change.
X-Git-Tag: wl-2_4_1pre~32
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3d6b9ae18b26cd6b7ededb1cb9532287d61270c7;p=elisp%2Fwanderlust.git

Fix last change.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index f354d04..db50f4a 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,7 +1,7 @@
 2000-12-24  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
-	* wl-version.el (wl-version-status-alist): Use `=' instead of
-	`eq'.
+	* wl-version.el (wl-version-status-alist): Use `zerop' instead of
+	(eq x 0).
 
 2000-11-27  Kenichi OKADA  <okada@opaopa.org>
 
diff --git a/wl/wl-version.el b/wl/wl-version.el
index 0d248b6..009890f 100644
--- a/wl/wl-version.el
+++ b/wl/wl-version.el
@@ -61,7 +61,7 @@ If ARG insert string at point."
     (message "%s" (wl-version t))))
 
 (defvar wl-version-status-alist
-  '(((= (% (nth 1 (product-version (product-find 'wl-version))) 2) 0)
+  '(((zerop (% (nth 1 (product-version (product-find 'wl-version))) 2))
      . "stable")
     (t . "beta"))
   "An alist to define the version status.")