From 3e945b3c0c7c70de91a54d089e78459dd04fbf39 Mon Sep 17 00:00:00 2001 From: kaoru Date: Sat, 15 Dec 2001 16:14:32 +0000 Subject: [PATCH] * WL-MK (toplevel): Use = instead of `eq' for numeric value. (config-wl-package-subr, config-wl-package-xmas): Removed last period from error messages. --- ChangeLog | 6 ++++++ WL-MK | 8 ++++---- 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 813478a..37de1bd 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2001-12-15 TAKAHASHI Kaoru + + * 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 * 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) -- 1.7.10.4