The completion function expects a list instead of an alist.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index edf4433..4499c7d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-12-05  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-sum.el (gnus-summary-respool-article): The completion function
+       expects a list instead of an alist.
+
        * nntp.el (nntp-snarf-error-message): nnheader-report takes a format
        string as the parameter.
 

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 149ba5a..2bb39af 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -10004,7 +10004,7 @@ current group into whatever groups they are destined to.  In the
 latter case, they will be copied into the relevant groups."
   (interactive
    (list current-prefix-arg
-        (let* ((methods (gnus-methods-using 'respool))
+        (let* ((methods (mapcar #'car (gnus-methods-using 'respool)))
                (methname
                 (symbol-name (or gnus-summary-respool-default-method
                                  (car (gnus-find-method-for-group