From 974943a30403328d8a60d710bc042a54133f0c7d Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Sun, 18 Nov 2001 13:13:47 +0000 Subject: [PATCH] 2001-11-18 08:00:00 ShengHuo ZHU * nnfolder.el (nnfolder-read-folder): Use group instead of nnfolder-current-group. Suggested by Lorentey Karoly . --- lisp/ChangeLog | 6 ++++++ lisp/nnfolder.el | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a4eec603f..70de01367 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2001-11-18 08:00:00 ShengHuo ZHU + + * nnfolder.el (nnfolder-read-folder): Use group instead of + nnfolder-current-group. + Suggested by Lorentey Karoly . + 2001-11-17 Simon Josefsson * message.el (message-send): Ask user if Fcc/Gcc should be diff --git a/lisp/nnfolder.el b/lisp/nnfolder.el index 1f96ab9af..e6781409c 100644 --- a/lisp/nnfolder.el +++ b/lisp/nnfolder.el @@ -963,7 +963,7 @@ deleted. Point is left where the deleted region was." (nnfolder-insert-newsgroup-line (cons nil (setq newnum - (nnfolder-active-number nnfolder-current-group)))) + (nnfolder-active-number group)))) (when novbuf (let ((headers (nnfolder-parse-head newnum (point-min) (point-max)))) @@ -981,7 +981,7 @@ deleted. Point is left where the deleted region was." (setq newscantime (visited-file-modtime)) (if scantime (setcdr scantime (list newscantime)) - (push (list nnfolder-current-group newscantime) + (push (list group newscantime) nnfolder-scantime-alist)) ;; Save nov. (when novbuf -- 2.25.1