From: kaoru <kaoru>
Date: Sun, 17 Jan 2010 13:31:50 +0000 (+0000)
Subject: * elmo-imap4.el (elmo-folder-list-messages-plugged): Use TAB for
X-Git-Tag: elmo-imap4-compliance-root~16
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=df48d24d8255abb3a126d59bfa3cc99012df6ada;p=elisp%2Fwanderlust.git

* elmo-imap4.el (elmo-folder-list-messages-plugged): Use TAB for
indent (only cosmetic fix).
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index ddf1133..2bdd3dc 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2010-01-17  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* elmo-imap4.el (elmo-folder-list-messages-plugged): Use TAB for
+	indent (only cosmetic fix).
+
 2010-01-15  Vitaly Mayatskih  <v.mayatskih@gmail.com>
 
 	* elmo-version.el (elmo-version): Up to 2.15.9.
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 7f2bcc4..e377dc6 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -1985,17 +1985,14 @@ Return nil if no complete line has arrived."
        (format "uid %s:%s" min max)))
     " undeleted")))
 
-(luna-define-method elmo-folder-list-messages-plugged ((folder
-                                                        elmo-imap4-folder)
-                                                       &optional
-                                                       enable-killed)
-
+(luna-define-method elmo-folder-list-messages-plugged
+  ((folder elmo-imap4-folder) &optional enable-killed)
   (let* ((old (elmo-msgdb-list-messages (elmo-folder-msgdb folder)))
-         (new (elmo-imap4-folder-list-range folder
-               (1+ (or (elmo-folder-get-info-max folder) 0)) "*"))
-         (united-old-new (elmo-union old new)))
+	 (new (elmo-imap4-folder-list-range
+	       folder (1+ (or (elmo-folder-get-info-max folder) 0)) "*"))
+	 (united-old-new (elmo-union old new)))
     (if (= (length united-old-new) (or (elmo-folder-get-info-length folder) 0))
-        united-old-new
+	united-old-new
       (elmo-union new
 		  (elmo-imap4-folder-list-range
 		   folder