From 1c4e766f922c15d095f02c3d06d54f5bdc855d41 Mon Sep 17 00:00:00 2001
From: Mats Rauhala <mats.rauhala@iki.fi>
Date: Fri, 29 Oct 2021 17:43:35 +0300
Subject: [PATCH] Redundant bracket

---
 src/Control/Addressbook/Query.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Control/Addressbook/Query.hs b/src/Control/Addressbook/Query.hs
index 24d534c..cf3d3fe 100644
--- a/src/Control/Addressbook/Query.hs
+++ b/src/Control/Addressbook/Query.hs
@@ -36,7 +36,7 @@ query prefix = do
       CB.sourceFile (dir </> ".addressbook.dat")
         .| CT.decode CT.utf8
         .| CT.lines
-        .| C.filter (\v -> prefixLC `T.isPrefixOf` (T.toLower v))
+        .| C.filter (\v -> prefixLC `T.isPrefixOf` T.toLower v)
         .| CT.encode CT.utf8
         .| C.map (<> "\n")
         .| CB.sinkHandle stdout