summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mumi/messages.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/mumi/messages.scm b/mumi/messages.scm
index f228687..00f80fd 100644
--- a/mumi/messages.scm
+++ b/mumi/messages.scm
@@ -365,10 +365,11 @@ unprocessed query string and an alist of search attributes."
#:attributes ,(cons `(@author string-contains ,who) attrs)
#:filters ,fs))
;; This is not supported by the Debbugs SOAP service,
- ;; so we filter locally.
+ ;; so we filter locally. At least we know that we need
+ ;; bugs where the author is "who".
(("submitter" who)
`(#:terms ,terms
- #:attributes ,attrs
+ #:attributes ,(cons `(@author string-contains ,who) attrs)
#:filters ,(cons (lambda (bug)
(string-contains-ci (bug-originator bug)
who))