From: kaoru <kaoru>
Date: Sun, 14 Sep 2003 23:20:21 +0000 (+0000)
Subject: * elmo-imap4.el (elmo-imap4-fetch-callback-1-subr): Fixed paren
X-Git-Tag: wl-2_11_13~3
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=bbe74a33f6958058a310909e515a3a62e222a89d;p=elisp%2Fwanderlust.git

* elmo-imap4.el (elmo-imap4-fetch-callback-1-subr): Fixed paren
mismatch.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 29fa573..d3f1d36 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2003-09-14  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* elmo-imap4.el (elmo-imap4-fetch-callback-1-subr): Fixed paren
+	mismatch.
+
 2003-09-14  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* elmo.el (elmo-message-cached-p): Use `elmo-message-flagged-p'
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 2b58137..19b000a 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -795,8 +795,8 @@ If CHOP-LENGTH is not specified, message set is not chopped."
 	       (and (elmo-string-member-ignore-case "\\Answered" flags)
 		    '(answered))
 	       (and (elmo-file-cache-exists-p msg-id)
-		    '(cached))))
-	    saved-flags)
+		    '(cached)))
+	    saved-flags))
     (when (and (or (memq 'important flag-list)
 		   (memq 'answered flag-list))
 	       (memq 'unread flag-list))