* 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 (file)
--- 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 (file)
--- 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))