From 413918ee575c86a01a9b2022dfcdd28952f5112a Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Sat, 22 Feb 2003 20:31:50 +0000 Subject: [PATCH] (gnus-get-unread-articles-in-group): Make sure the entry for the group exists before we alter it. --- lisp/ChangeLog | 5 +++++ lisp/gnus-start.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 29d2e4a7e..41e04bf7c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-02-22 Lars Magne Ingebrigtsen + + * gnus-start.el (gnus-get-unread-articles-in-group): Make sure + the entry for the group exists before we alter it. + 2003-02-22 Kai Gro,A_(Bjohann * gnus-agent.el (gnus-agent-get-undownloaded-list): Sort diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index 0d3e7b08a..f5d6c253a 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -1553,7 +1553,8 @@ newsgroup." (setq range (cdr range))) (setq num (max 0 (- (cdr active) num))))) ;; Set the number of unread articles. - (when info + (when (and info + (gnus-gethash (gnus-info-group info) gnus-newsrc-hashtb)) (setcar (gnus-gethash (gnus-info-group info) gnus-newsrc-hashtb) num)) num))) -- 2.25.1