From: kaoru <kaoru>
Date: Sat, 15 Dec 2001 16:14:32 +0000 (+0000)
Subject: * WL-MK (toplevel): Use = instead of `eq' for numeric value.
X-Git-Tag: wl-2_8_0pre2~28
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3e945b3c0c7c70de91a54d089e78459dd04fbf39;p=elisp%2Fwanderlust.git

* WL-MK (toplevel): Use = instead of `eq' for numeric value.
(config-wl-package-subr, config-wl-package-xmas): Removed last
period from error messages.
---

diff --git a/ChangeLog b/ChangeLog
index 813478a..37de1bd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2001-12-15  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* WL-MK (toplevel): Use = instead of `eq' for numeric value.
+	(config-wl-package-subr, config-wl-package-xmas): Removed last
+	period from error messages.
+
 2001-12-12  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* NEWS, NEWS.ja: Changed order.
diff --git a/WL-MK b/WL-MK
index e6462bf..0026e0a 100644
--- a/WL-MK
+++ b/WL-MK
@@ -43,7 +43,7 @@
 	     ;; ignore broken module
 	     (not (featurep 'tinycustom)))
   (when (and (boundp 'emacs-major-version)
-	     (eq emacs-major-version 19)
+	     (= emacs-major-version 19)
 	     (>= emacs-minor-version 29))
     (message "%s" "
   Warning: You don't seem to have \"new custom\" package installed.
@@ -105,11 +105,11 @@
     (load "./WL-ELS" nil nil t)
     (condition-case ()
 	(require 'mime-setup)
-      (error (error "No MIME module was detected. Please install SEMI.")))
+      (error (error "No MIME module was detected.  Please install SEMI")))
     ;; 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"))))
 
 (defun config-wl-pixmap-dir (&optional packagedir)
   "Examine pixmap directory where icon files should go."
@@ -263,7 +263,7 @@
 
 (defun config-wl-package-xmas ()
   (if (not (featurep 'xemacs))
-      (error "This directive is only for XEmacs."))
+      (error "This directive is only for XEmacs"))
   (config-wl-package-subr)
   ;; PACKAGEDIR check.
   (let (package-dir)