From: hmurata <hmurata>
Date: Tue, 15 Oct 2002 13:58:18 +0000 (+0000)
Subject: * elmo-filter.el (elmo-folder-diff): Fixed condition checking
X-Git-Tag: elmo-mark-restart~110
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=09146fcf7d94002d926e91180ec8d7df6243215f;p=elisp%2Fwanderlust.git

* elmo-filter.el (elmo-folder-diff): Fixed condition checking
`last:' filter.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 582828f..5a91f61 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2002-10-15  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* elmo-filter.el (elmo-folder-diff): Fixed condition checking
+	`last:' filter.
+
 2002-10-06  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* elmo-dop.el (elmo-dop-queue-flush): Check obsolete at first.
diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el
index 612c47f..33b9808 100644
--- a/elmo/elmo-filter.el
+++ b/elmo/elmo-filter.el
@@ -224,10 +224,11 @@
 	  (if (consp diff)
 	      (cons (car diff) (car diff))
 	    (cons (car diff) (nth 1 diff))))
-	 ((string-match "^last$" (elmo-filter-key condition))
+	 ((string= "last" (elmo-filter-key condition))
+	  (luna-call-next-method))
+	 (t
 	  (cons nil (cdr (elmo-folder-diff (elmo-filter-folder-target-internal
-					    folder)))))
-	 (t (luna-call-next-method)))
+					    folder))))))
       (luna-call-next-method))))
 
 (luna-define-method elmo-folder-status ((folder elmo-filter-folder))