From: hmurata <hmurata>
Date: Sun, 1 May 2005 03:49:49 +0000 (+0000)
Subject: Fixed indant.
X-Git-Tag: wl-2_15_3~78
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=379641b74a2023dff46b88007c66c1960e7adaff;p=elisp%2Fwanderlust.git

Fixed indant.
---

diff --git a/elmo/modb.el b/elmo/modb.el
index 762113f..c02b7f4 100644
--- a/elmo/modb.el
+++ b/elmo/modb.el
@@ -242,16 +242,16 @@ If optional argument TYPE is specified, return converted value.")
       (let ((flags (elmo-msgdb-flags msgdb number)))
 	(cond ((string= (elmo-filter-value condition) "any")
 	       (and flags (not (equal flags '(cached)))))
-	     ((string= (elmo-filter-value condition) "digest")
-	      (catch 'found
-		(dolist (flag flags)
-		  (when (or (memq flag elmo-digest-flags)
-			    (elmo-global-flag-p flag))
-		    (throw 'found t)))))
-	     ((string= (elmo-filter-value condition) "read")
-	      (not (memq 'read flags)))
-	     (t
-	      (memq (intern (elmo-filter-value condition)) flags)))))
+	      ((string= (elmo-filter-value condition) "digest")
+	       (catch 'found
+		 (dolist (flag flags)
+		   (when (or (memq flag elmo-digest-flags)
+			     (elmo-global-flag-p flag))
+		     (throw 'found t)))))
+	      ((string= (elmo-filter-value condition) "read")
+	       (not (memq 'read flags)))
+	      (t
+	       (memq (intern (elmo-filter-value condition)) flags)))))
      (t
       (elmo-msgdb-message-match-condition (elmo-message-entity-handler entity)
 					  condition entity)))))