From: ueno <ueno>
Date: Thu, 28 Nov 2002 19:32:35 +0000 (+0000)
Subject: * lisp/gnus-agent.el (gnus-agent-fetch-headers): Don't refer to
X-Git-Tag: t-gnus-6_15_10-00-quimby~57
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e0d0fb56b8ef8c32869bef7f1f419cb3f11e205e;p=elisp%2Fgnus.git-

* lisp/gnus-agent.el (gnus-agent-fetch-headers): Don't refer to
the value of `gnus-agent-file-name'.
---

diff --git a/ChangeLog b/ChangeLog
index fc017c1..4960730 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2002-11-28  Daiki Ueno  <ueno@unixuser.org>
 
+	* lisp/gnus-agent.el (gnus-agent-fetch-headers): Don't refer to
+	the value of `gnus-agent-file-name'.
+
+2002-11-28  Daiki Ueno  <ueno@unixuser.org>
+
 	* lisp/gnus-agent.el (gnus-agent-fetch-group-1): Article numbers
 	should be accessed through `mail-header-number'.
 
diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el
index 349688f..7aeb369 100644
--- a/lisp/gnus-agent.el
+++ b/lisp/gnus-agent.el
@@ -1212,7 +1212,7 @@ and that there are no duplicates."
           (gnus-agent-check-overview-buffer)
 	  (write-region-as-coding-system
 	   gnus-agent-file-coding-system
-	   (1+ (point-min)) (point-max) gnus-agent-file-name nil 'silent)
+	   (1+ (point-min)) (point-max) file nil 'silent)
           (gnus-agent-save-alist group articles nil)
           articles)))
     articles))