From: Ramakrishnan Muthukrishnan <ram@rkrishnan.org>
Date: Thu, 26 Mar 2015 10:58:47 +0000 (+0530)
Subject: remove unnecessary parenthesis (hlint suggestion)
X-Git-Url: https://git.rkrishnan.org/Site/Content/Exhibitors/module-simplejson._speedups.html?a=commitdiff_plain;h=757e0088fe47bcc41984c73ee47dd24601aa39fa;p=functorrent.git

remove unnecessary parenthesis (hlint suggestion)
---

diff --git a/src/FuncTorrent/Metainfo.hs b/src/FuncTorrent/Metainfo.hs
index dad0865..1fd9475 100644
--- a/src/FuncTorrent/Metainfo.hs
+++ b/src/FuncTorrent/Metainfo.hs
@@ -89,6 +89,6 @@ getAnnounceList (Just (Blist l)) = map (\s -> case s of
 getAnnounceList (Just (Bdict _)) = []
 
 getTrackers :: Metainfo -> [String]
-getTrackers m = case (announce m) of
+getTrackers m = case announce m of
                  Nothing -> announceList m
                  Just a -> a : announceList m