From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Wed, 5 Sep 2012 17:29:50 +0000 (+0200)
Subject: Indent.
X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;h=86823acedaad0115af87e7ce7446221449290886;p=gnus

Indent.
---

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index be5501bee..73ce709fa 100644
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -993,16 +993,19 @@ If LIMIT, first try to limit the search to the N last articles."
                      (when (equal "EXISTS" (cadr result))
                        (throw 'found (car result)))))))
            (sequence
-            (nnimap-send-command "UID SEARCH%s HEADER Message-Id %S"
-                                 (if (and limit number-of-article)
-                                     ;; The -1 is because IMAP message
-                                     ;; numbers are one-based rather than
-                                     ;; zero-based.
-                                     (format " %s:*" (- (string-to-number number-of-article) limit -1))
-                                   "")
-                                 message-id)))
+            (nnimap-send-command
+	     "UID SEARCH%s HEADER Message-Id %S"
+	     (if (and limit number-of-article)
+		 ;; The -1 is because IMAP message
+		 ;; numbers are one-based rather than
+		 ;; zero-based.
+		 (format " %s:*" (- (string-to-number number-of-article)
+				    limit -1))
+	       "")
+	     message-id)))
       (when (nnimap-wait-for-response sequence)
-        (let ((article (car (last (cdr (assoc "SEARCH" (nnimap-parse-response)))))))
+        (let ((article (car (last (cdr (assoc "SEARCH"
+					      (nnimap-parse-response)))))))
           (if article
               (string-to-number article)
             (when (and limit number-of-article)