From 3d53b08b7fe4a7727418670e510d826eae576f14 Mon Sep 17 00:00:00 2001
From: Sam T <pxqr.sta@gmail.com>
Date: Fri, 17 May 2013 05:06:00 +0400
Subject: ~ Reorganize modules.

---
 src/Network/BitTorrent/Peer/Addr.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Network/BitTorrent/Peer/Addr.hs')

diff --git a/src/Network/BitTorrent/Peer/Addr.hs b/src/Network/BitTorrent/Peer/Addr.hs
index 0e6fcfb9..1c2ac2eb 100644
--- a/src/Network/BitTorrent/Peer/Addr.hs
+++ b/src/Network/BitTorrent/Peer/Addr.hs
@@ -28,7 +28,7 @@ data PeerAddr = PeerAddr {
       peerID   :: Maybe PeerID
     , peerIP   :: HostAddress
     , peerPort :: PortNumber
-    } deriving Show
+    } deriving (Show, Eq)
 
 instance BEncodable PortNumber where
   toBEncode = toBEncode . fromEnum
-- 
cgit v1.2.3