From: Ramakrishnan Muthukrishnan <ram@rkrishnan.org>
Date: Wed, 2 Aug 2017 06:22:53 +0000 (+0530)
Subject: metainfo: remove a redundant "show"
X-Git-Url: https://git.rkrishnan.org/simplejson/components/com_hotproperty/frontends/%22file:/htmlfontify-example.html?a=commitdiff_plain;h=a239b81e780317adbd62be75541bbbe99ba5e06b;p=functorrent.git

metainfo: remove a redundant "show"
---

diff --git a/src/FuncTorrent/Metainfo.hs b/src/FuncTorrent/Metainfo.hs
index 9354082..bec28b8 100644
--- a/src/FuncTorrent/Metainfo.hs
+++ b/src/FuncTorrent/Metainfo.hs
@@ -130,5 +130,5 @@ torrentToMetainfo :: ByteString -> Either String Metainfo
 torrentToMetainfo s =
   case decode s of
     Right d -> mkMetaInfo d
-    Left e -> Left (show "Cannot parse the torrent file: " ++ show e)
+    Left e -> Left ("Cannot parse the torrent file: " ++ show e)