From a0b5edfd70edf76472ea8b06ab3c9011ad66f908 Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 13 Nov 2000 02:45:43 +0000 Subject: [PATCH] * elmo-internal.el (elmo-internal-search): Fix last change. --- elmo/ChangeLog | 4 ++++ elmo/elmo-internal.el | 4 +++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 840fe01..1a67298 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,7 @@ +2000-11-13 Yuuichi Teranishi + + * elmo-internal.el (elmo-internal-search): Fix last change. + 2000-11-08 Yuuichi Teranishi * elmo-internal.el (elmo-internal-search): Rewrite. diff --git a/elmo/elmo-internal.el b/elmo/elmo-internal.el index ee877de..461287c 100644 --- a/elmo/elmo-internal.el +++ b/elmo/elmo-internal.el @@ -236,7 +236,9 @@ case-fold-search) (setq num (length msgs)) (while msgs - (if (and (setq cache-file (elmo-cache-exists-p (cdr (car loc-alist)))) + (if (and (setq cache-file (elmo-cache-get-path (cdr (assq (car msgs) + loc-alist)))) + (file-exists-p cache-file) (elmo-file-field-condition-match cache-file condition (car msgs) -- 1.7.10.4