diff --git a/lisp/gnus/gnus-search.el b/lisp/gnus/gnus-search.el index a59d0e57a7..fc9f8684f6 100644 --- a/lisp/gnus/gnus-search.el +++ b/lisp/gnus/gnus-search.el @@ -1358,9 +1358,12 @@ gnus-search-indexed-parse-output "\\|"))) artlist vectors article group) (goto-char (point-min)) - (while (not (eobp)) + (while (not (or (eobp) + (looking-at-p + "\\(?:[[:space:]\n]+\\)?Process .+ finished"))) (pcase-let ((`(,f-name ,score) (gnus-search-indexed-extract engine))) - (when (and (file-readable-p f-name) + (when (and f-name + (file-readable-p f-name) (null (file-directory-p f-name)) (or (null groups) (and (gnus-search-single-p query)