From 569d9586f13456548ea5244a47d18586e379ce4e Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 10 Oct 2003 03:15:03 +0000 Subject: [PATCH] Synch to Gnus 200310100249. --- lisp/ChangeLog | 4 ++++ lisp/gnus-group.el | 3 +++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6ebdc20..a1e4ea3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2003-10-10 Jesper Harder + + * gnus-group.el (gnus-group-suspend): Reset gnus-backlog-articles. + 2003-10-08 Lars Magne Ingebrigtsen * dns.el (query-dns): Don't error out on malformed resolv files. diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el index 200aef2..348d15c 100644 --- a/lisp/gnus-group.el +++ b/lisp/gnus-group.el @@ -3935,6 +3935,8 @@ If GROUP, edit that local kill file instead." (interactive) (gnus-save-newsrc-file)) +(eval-when-compile (defvar gnus-backlog-articles)) + (defun gnus-group-suspend () "Suspend the current Gnus session. In fact, cleanup buffers except for group mode buffer. @@ -3952,6 +3954,7 @@ The hook `gnus-suspend-gnus-hook' is called before actually suspending." (eq major-mode 'message-mode)))) (gnus-kill-buffer buf))) (gnus-buffers)) + (setq gnus-backlog-articles nil) (gnus-kill-gnus-frames) (when group-buf (bury-buffer group-buf) -- 1.7.10.4