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

parenthesis.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 91d800c..a595174 100644 (file)
--- 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 (file)
--- 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)