nnir.el (nnir-run-imap): Order the article list separately for each group.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f2e95ba..be7c0a9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-11-17  Andrew Cohen  <cohen@andy.bu.edu>
+
+       * nnir.el (nnir-run-imap): Reverse the article list for each group
+       rather than the whole list.
+
 2010-11-17  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * shr.el (shr-image-displayer): Protect function against non-existent

diff --git a/lisp/nnir.el b/lisp/nnir.el
index 3745677..1983a0a 100644 (file)
--- a/lisp/nnir.el
+++ b/lisp/nnir.el
@@ -677,14 +677,14 @@ details on the language and supported extensions"
                         (cdr (assoc nnir-imap-default-search-key
                                     nnir-imap-search-arguments))))
           (gnus-inhibit-demon t)
-         (groups (or groups (nnir-get-active srv)))
-          artlist)
+         (groups (or groups (nnir-get-active srv))))
       (message "Opening server %s" server)
       (apply
        'vconcat
        (mapcar
        (lambda (x)
-         (let ((group x))
+         (let ((group x)
+               artlist)
            (condition-case ()
                (when (nnimap-possibly-change-group
                       (gnus-group-short-name group) server)