From fb7d2802bca2a24a7584abc9aeb21d157e0fc77d Mon Sep 17 00:00:00 2001 From: okazaki Date: Sun, 18 Feb 2001 21:03:25 +0000 Subject: [PATCH] * wl-template.el (wl-template-next): Use `=' instead of `eq' for comparing numbers. (wl-template-prev): Use `zerop' instead of `eq 0'. --- wl/wl-template.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/wl/wl-template.el b/wl/wl-template.el index 9874ce6..ca8a42d 100644 --- a/wl/wl-template.el +++ b/wl/wl-template.el @@ -144,15 +144,15 @@ ARG is ignored." ; ARG ignored this version (?) (defun wl-template-next () "Display next reference in other buffer." (interactive) - (if (eq wl-template-max-num - (setq wl-template-cur-num (1+ wl-template-cur-num))) + (if (= wl-template-max-num + (setq wl-template-cur-num (1+ wl-template-cur-num))) (setq wl-template-cur-num 0)) (wl-template-show)) (defun wl-template-prev () "Display previous reference in other buffer." (interactive) - (setq wl-template-cur-num (if (eq wl-template-cur-num 0) + (setq wl-template-cur-num (if (zerop wl-template-cur-num) (1- wl-template-max-num) (1- wl-template-cur-num))) (wl-template-show)) -- 1.7.10.4