diff options
| author | Sam T <pxqr.sta@gmail.com> | 2013-05-17 05:06:00 +0400 |
|---|---|---|
| committer | Sam T <pxqr.sta@gmail.com> | 2013-05-17 05:06:00 +0400 |
| commit | 3d53b08b7fe4a7727418670e510d826eae576f14 (patch) | |
| tree | e7d2cb26077b6ab4ab5e732034bc23d542419a85 /src/Network/BitTorrent | |
| parent | 448b86fca5cac5abfef66598391614a8a4f83a46 (diff) | |
~ Reorganize modules.
Diffstat (limited to 'src/Network/BitTorrent')
| -rw-r--r-- | src/Network/BitTorrent/Peer/Addr.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 { | |||
| 28 | peerID :: Maybe PeerID | 28 | peerID :: Maybe PeerID |
| 29 | , peerIP :: HostAddress | 29 | , peerIP :: HostAddress |
| 30 | , peerPort :: PortNumber | 30 | , peerPort :: PortNumber |
| 31 | } deriving Show | 31 | } deriving (Show, Eq) |
| 32 | 32 | ||
| 33 | instance BEncodable PortNumber where | 33 | instance BEncodable PortNumber where |
| 34 | toBEncode = toBEncode . fromEnum | 34 | toBEncode = toBEncode . fromEnum |