From 4af2c3819138de450727b65e4b34d8c13df49360 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Fri, 27 Jul 2001 19:13:40 +0000 Subject: [PATCH] 2001-07-27 12:00:00 ShengHuo ZHU * nnfolder.el (nnfolder-request-accept-article): Bind nntp-server-buffer. --- lisp/ChangeLog | 3 +++ lisp/nnfolder.el | 5 +++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fdd207e26..b7514e376 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2001-07-27 12:00:00 ShengHuo ZHU + * nnfolder.el (nnfolder-request-accept-article): Bind + nntp-server-buffer. + * nnmail.el (nnmail-parse-active): Read from buffer instead of nntp-server-buffer. diff --git a/lisp/nnfolder.el b/lisp/nnfolder.el index 1f581991a..ceedda381 100644 --- a/lisp/nnfolder.el +++ b/lisp/nnfolder.el @@ -447,8 +447,9 @@ all. This may very well take some time.") (goto-char (point-min)) (when (looking-at "X-From-Line: ") (replace-match "From ")) - (let ((nnmail-file-coding-system nnfolder-active-file-coding-system)) - (with-temp-buffer + (with-temp-buffer + (let ((nnmail-file-coding-system nnfolder-active-file-coding-system) + (nntp-server-buffer (current-buffer))) (nnmail-find-file nnfolder-active-file) (setq nnfolder-group-alist (nnmail-parse-active)))) (save-excursion -- 2.25.1