* gnus-sum.el (gnus-summary-insert-old-articles): Bind

	gnus-fetch-old-headers.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e8f8133..3fd549d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2002-01-06  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
+       * gnus-sum.el (gnus-summary-insert-old-articles): Bind
+       gnus-fetch-old-headers.
+
        * gnus-art.el (article-display-x-face): Use the current buffer
        unless `W f'. Otherwise, X-Face may be shown in the header of a
        forwarded part.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 4ab6658..d59c545 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -10824,7 +10824,8 @@ If ALL is a number, fetch this number of articles."
                      (setq older (subseq older 0 all))))))))
        (if (not older)
            (message "No old news.")
-         (gnus-summary-insert-articles older)
+         (let ((gnus-fetch-old-headers t))
+           (gnus-summary-insert-articles older))
          (gnus-summary-limit (gnus-union older old))))
     (gnus-summary-position-point)))