From f06b3d7de137b3b1bf95e02de747bdd663bb61bd Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Thu, 14 May 2020 09:28:39 +0200 Subject: messages: Remove obsolete delete-duplicates call. --- mumi/messages.scm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/mumi/messages.scm b/mumi/messages.scm index 1e528b3..a743893 100644 --- a/mumi/messages.scm +++ b/mumi/messages.scm @@ -199,9 +199,8 @@ result for a while." (define* (search-bugs query #:key (sets '()) (max 400)) "Return a list of all bugs matching the given QUERY string. Intersect the result with the id sets in the list SETS." - (let* ((ids (delete-duplicates - (map string->number - (search query)))) + (let* ((ids (map string->number + (search query))) (filtered (match sets (() ids) (_ (apply lset-intersection eq? ids sets))))) -- cgit v1.2.3