From: hmurata <hmurata>
Date: Thu, 11 Mar 2004 09:14:45 +0000 (+0000)
Subject: * elmo-imap4.el (elmo-folder-set-flag-plugged): Fix mismatched
X-Git-Tag: wl-2_11_25~35
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c9bd5be5f70556c55d380d8fe47671cf6851a371;p=elisp%2Fwanderlust.git

* elmo-imap4.el (elmo-folder-set-flag-plugged): Fix mismatched
parenthesis.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 91d800c..a595174 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2004-03-11  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* elmo-imap4.el (elmo-folder-set-flag-plugged): Fix mismatched
+	parenthesis.
+
 2004-03-08  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
 	* elmo-vars.el (elmo-msgdb-default-type): Remove generic from the
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 26215d3..f0029d5 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -2363,8 +2363,8 @@ If optional argument REMOVE is non-nil, remove FLAG."
 						  numbers flag)
   (let ((spec (cdr (assq flag elmo-imap4-flag-specs))))
     (elmo-imap4-set-flag folder numbers (or (car spec)
-					    (capitalize (symbol-name flag))
-					    (nth 1 spec)))))
+					    (capitalize (symbol-name flag)))
+			 (nth 1 spec))))
 
 (luna-define-method elmo-folder-unset-flag-plugged ((folder elmo-imap4-folder)
 						    numbers flag)