From d274bda5ed5d3b0102568bf20ca3b0e0329d99c8 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Tue, 4 Mar 1997 19:17:48 +0000 Subject: [PATCH] *** empty log message *** --- lisp/ChangeLog | 7 +++++++ lisp/gnus.el | 6 ++++-- 2 files changed, 11 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ef6077b56..de61d1402 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,12 @@ +Fri Jun 7 22:08:53 1996 Lars Magne Ingebrigtsen + + * gnus.el (gnus-summary-refer-article): Would bug out when + referring non-sparse articles. + Fri Jun 7 19:59:45 1996 Lars Magne Ingebrigtsen + * gnus.el: Gnus v5.2.11 is released. + * gnus.el (gnus-summary-save-article): Would set `gnus-original-article-buffer' to a bogus value. (gnus-header-value): Didn't understand continuation headers! diff --git a/lisp/gnus.el b/lisp/gnus.el index 61cbeb512..9a7c24d62 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -1728,7 +1728,7 @@ variable (string, integer, character, etc).") "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls + Boys)" "The mail address of the Gnus maintainers.") -(defconst gnus-version-number "5.2.11" +(defconst gnus-version-number "5.2.12" "Version number for this version of Gnus.") (defconst gnus-version (format "Gnus v%s" gnus-version-number) @@ -11084,7 +11084,9 @@ Return how many articles were fetched." (unless (string-match ">$" message-id) (setq message-id (concat message-id ">"))) (let* ((header (gnus-id-to-header message-id)) - (sparse (memq (mail-header-number header) gnus-newsgroup-sparse))) + (sparse (and header + (memq (mail-header-number header) + gnus-newsgroup-sparse)))) (if header (prog1 ;; The article is present in the buffer, to we just go to it. -- 2.34.1