Synch to No Gnus 200601241028.

[elisp/gnus.git-] / lisp / gnus-uu.el

diff --git a/lisp/gnus-uu.el b/lisp/gnus-uu.el
index aa37d35..52b7617 100644 (file)
--- a/lisp/gnus-uu.el
+++ b/lisp/gnus-uu.el
@@ -487,7 +487,7 @@ didn't work, and overwrite existing files.  Otherwise, ask each time."
        ;; The case where neither a number of articles nor a region is
        ;; specified.
        (gnus-summary-top-thread)
-       (setq gnus-article-reply (gnus-uu-get-list-of-articles nil)))
+       (setq gnus-article-reply (nreverse (gnus-uu-find-articles-matching))))
       ;; Specify articles to be forwarded.  Note that they should be
       ;; reversed; see `gnus-uu-get-list-of-articles'.
       (setq gnus-newsgroup-processable (reverse gnus-article-reply))