From 379641b74a2023dff46b88007c66c1960e7adaff Mon Sep 17 00:00:00 2001 From: hmurata Date: Sun, 1 May 2005 03:49:49 +0000 Subject: [PATCH] Fixed indant. --- elmo/modb.el | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) 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))))) -- 1.7.10.4