From 1e13610b75718e7904f8af181fb73571639e1211 Mon Sep 17 00:00:00 2001 From: Andrew G Cohen Date: Tue, 20 Jun 2023 07:59:51 +0800 Subject: [PATCH] Don't read all headers in gnus thread referral (bug#63842) Gnus thread referral tries to add newly found articles to an existing summary buffer. When the list of such articles is known from searching we can speed things up by only entering these specific headers into the dependencies table. * lisp/gnus/gnus-sum.el (gnus-summary-refer-thread): Don't set `gnus-read-all-available-headers' when finding articles by searching. --- lisp/gnus/gnus-sum.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 4effaa981ec..a3be5577f7a 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -9029,7 +9029,6 @@ is non-numeric or nil fetch the number specified by the (id (mail-header-id header)) (gnus-inhibit-demon t) (gnus-summary-ignore-duplicates t) - (gnus-read-all-available-headers t) (gnus-refer-thread-use-search (if (or (null limit) (numberp limit)) gnus-refer-thread-use-search @@ -9049,7 +9048,8 @@ is non-numeric or nil fetch the number specified by the (gnus-search-thread header)) ;; Otherwise just retrieve some headers. (t - (let* ((limit (if (numberp limit) + (let* ((gnus-read-all-available-headers t) + (limit (if (numberp limit) limit gnus-refer-thread-limit)) (last (if (numberp limit) -- 2.39.5