Fix nnir searching on nested Gnus topics

* lisp/gnus/nnir.el (gnus-group-make-nnir-group): On a topic line,
search all the groups, even in sub-topics (bug#28090).
This commit is contained in:
Lars Ingebrigtsen
2019-09-27 00:43:43 +02:00
parent 8e36ddfd44
commit 1a63e922e8

View File

@@ -593,6 +593,8 @@ Add an entry here when adding a new search engine.")
;; Gnus glue.
(declare-function gnus-group-topic-name "gnus-topic" ())
(declare-function gnus-topic-find-groups "gnus-topic"
(topic &optional level all lowest recursive))
(defun gnus-group-make-nnir-group (nnir-extra-parms &optional specs)
"Create an nnir group. Prompt for a search query and determine
@@ -613,7 +615,9 @@ skips all prompting."
(or gnus-group-marked
(if (gnus-group-group-name)
(list (gnus-group-group-name))
(cdr (assoc (gnus-group-topic-name) gnus-topic-alist))))
(mapcar (lambda (entry)
(gnus-info-group (cadr entry)))
(gnus-topic-find-groups (gnus-group-topic-name)))))
gnus-group-server))))
(query-spec
(or (cdr (assq 'nnir-query-spec specs))