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>
(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.")