From 286a818018d36afe88ed6048e92937d5bc4f683e Mon Sep 17 00:00:00 2001
From: Sam Truzjan <pxqr.sta@gmail.com>
Date: Wed, 26 Feb 2014 21:34:00 +0400
Subject: Add Eq instance for RpcException

---
 src/Network/BitTorrent/Tracker/RPC/UDP.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Network/BitTorrent/Tracker/RPC/UDP.hs')

diff --git a/src/Network/BitTorrent/Tracker/RPC/UDP.hs b/src/Network/BitTorrent/Tracker/RPC/UDP.hs
index 8d31bfe5..632e3d86 100644
--- a/src/Network/BitTorrent/Tracker/RPC/UDP.hs
+++ b/src/Network/BitTorrent/Tracker/RPC/UDP.hs
@@ -221,7 +221,7 @@ data RpcException
 
     -- | RPC manager closed while waiting for response.
   | ManagerClosed
-    deriving (Show, Typeable)
+    deriving (Eq, Show, Typeable)
 
 instance Exception RpcException
 
-- 
cgit v1.2.3