From: yamaoka <yamaoka>
Date: Wed, 24 Nov 1999 13:37:51 +0000 (+0000)
Subject: (gnus-agent-fetch-headers): Use `gnus-union' instead of `union'.
X-Git-Tag: t-gnus-6_13_3-05~2
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=fa41a80903328a9c0e0261f17c0ff863afb03cac;p=elisp%2Fgnus.git-

(gnus-agent-fetch-headers): Use `gnus-union' instead of `union'.
---

diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el
index 5bfd446..7022a87 100644
--- a/lisp/gnus-agent.el
+++ b/lisp/gnus-agent.el
@@ -849,8 +849,8 @@ the actual number of articles toggled is returned."
 	   (setq articles (nthcdr i articles))))
     ;; add article with marks to list of article headers we want to fetch
     (dolist (arts (gnus-info-marks (gnus-get-info group)))
-      (setq articles (union (gnus-uncompress-sequence (cdr arts))
-			    articles)))
+      (setq articles (gnus-union (gnus-uncompress-sequence (cdr arts))
+				 articles)))
     (setq articles (sort articles '<))
     ;; remove known articles
     (when (gnus-agent-load-alist group)