nnimap respooling fix

* nnimap.el (nnimap-request-accept-article): Allow respooling using
nnimap.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0001120..9aebb54 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2015-01-26  Lars Ingebrigtsen  <larsi@gnus.org>
 
+       * nnimap.el (nnimap-request-accept-article): Allow respooling using
+       nnimap.
+
        * gnus-group.el (gnus-group-get-new-news-this-group): Explicitly
        request rescans when being run interactively.
 

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 382e490..ced5561 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1134,8 +1134,11 @@ If LIMIT, first try to limit the search to the N last articles."
     (setq group
          (caar
           (nnmail-article-group
+           ;; We don't really care about the article number, because
+           ;; that's determined by the IMAP server later.  So just
+           ;; return the group name.
            `(lambda (group)
-              (nnml-active-number group ,server))))))
+              (list (list group)))))))
   (setq group (nnimap-decode-gnus-group group))
   (when (nnimap-change-group nil server)
     (nnmail-check-syntax)