messages: Remove obsolete delete-duplicates call.
authorRicardo Wurmus <rekado@elephly.net>
Thu, 14 May 2020 07:28:39 +0000 (09:28 +0200)
committerRicardo Wurmus <rekado@elephly.net>
Thu, 14 May 2020 07:28:39 +0000 (09:28 +0200)
mumi/messages.scm

index 1e528b3f7850f304d7ce67906f0a28d083d22ce7..a7438935e4440b75428a5c9d28abcfbe7870e9cd 100644 (file)
@@ -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)))))