From: teranisi Date: Fri, 18 Oct 2002 00:10:31 +0000 (+0000) Subject: * elmo.el (elmo-generic-folder-diff): Avoid byte-compile warning. X-Git-Tag: elmo-mark-restart~108 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a4f39ef01f7848da98b0b44c28664d9a3d97d423;p=elisp%2Fwanderlust.git * elmo.el (elmo-generic-folder-diff): Avoid byte-compile warning. --- diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 7a3bb1d..9142f45 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,7 @@ +2002-10-18 Yuuichi Teranishi + + * elmo.el (elmo-generic-folder-diff): Avoid byte-compile warning. + 2002-10-15 Hiroya Murata * elmo-filter.el (elmo-folder-diff): Fixed condition checking diff --git a/elmo/elmo.el b/elmo/elmo.el index 792a581..f729de6 100644 --- a/elmo/elmo.el +++ b/elmo/elmo.el @@ -952,14 +952,11 @@ Return a cons cell of (NUMBER-CROSSPOSTS . NEW-MARK-ALIST).") 0)) (elmo-folder-set-info-hashtb folder in-db-max nil)) (setq in-db-max cached-in-db-max))) - (setq unsync (if (and in-db - (car in-folder)) + (setq unsync (if (and in-db (car in-folder)) (- (car in-folder) in-db-max) - (if (and in-folder - (null in-db)) + (if (and in-folder (null in-db)) (cdr in-folder) - (if (null (car in-folder)) - nil)))) + (car in-folder)))) (setq messages (cdr in-folder)) (if (and unsync messages (> unsync messages)) (setq unsync messages))