From a4f39ef01f7848da98b0b44c28664d9a3d97d423 Mon Sep 17 00:00:00 2001 From: teranisi Date: Fri, 18 Oct 2002 00:10:31 +0000 Subject: [PATCH] * elmo.el (elmo-generic-folder-diff): Avoid byte-compile warning. --- elmo/ChangeLog | 4 ++++ elmo/elmo.el | 9 +++------ 2 files changed, 7 insertions(+), 6 deletions(-) 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)) -- 1.7.10.4