Synch to No Gnus 200403151234.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 64e6dbe..bafb8ac 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2004-03-15  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-sum.el (gnus-read-header): Don't remove a header for the
+       parent article of a sparse article in the thread hashtb.  From
+       Stefan Wiens <s.wi@gmx.net>.
+
 2004-03-12  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * imap.el (imap-store-password): New variable.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 9c52793..8840095 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -11335,14 +11335,6 @@ If REVERSE, save parts that do not match TYPE."
             (not (gnus-summary-article-sparse-p (mail-header-number header))))
        ;; We have found the header.
        header
-      ;; If this is a sparse article, we have to nix out its
-      ;; previous entry in the thread hashtb.
-      (when (and header
-                (gnus-summary-article-sparse-p (mail-header-number header)))
-       (let* ((parent (gnus-parent-id (mail-header-references header)))
-              (thread (and parent (gnus-id-to-thread parent))))
-         (when thread
-           (delq (assq header thread) thread))))
       ;; We have to really fetch the header to this article.
       (save-excursion
        (set-buffer nntp-server-buffer)