;; By courtesy of Keiichi-san.

* (gnus-summary-move-article): Fix, could not respool article.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 3e3be19..12726ec 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -7190,7 +7190,7 @@ and `request-accept' functions."
            ;; Copy any marks over to the new group.
            (let ((marks gnus-article-mark-lists)
                  (to-article (cdr art-group)))
-             (unless (gnus-group-auto-expirable-p to-newsgroup)
+             (unless (gnus-group-auto-expirable-p to-group)
                (setq marks (delete '(expirable . expire) marks)))
 
              ;; See whether the article is to be put in the cache.