diff options
Diffstat (limited to 'bittorrent/tests/Network')
-rw-r--r-- | bittorrent/tests/Network/BitTorrent/CoreSpec.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/bittorrent/tests/Network/BitTorrent/CoreSpec.hs b/bittorrent/tests/Network/BitTorrent/CoreSpec.hs index 5bf900b2..e9b17a42 100644 --- a/bittorrent/tests/Network/BitTorrent/CoreSpec.hs +++ b/bittorrent/tests/Network/BitTorrent/CoreSpec.hs | |||
@@ -4,7 +4,11 @@ module Network.BitTorrent.CoreSpec (spec) where | |||
4 | import Control.Applicative | 4 | import Control.Applicative |
5 | import Data.BEncode as BE | 5 | import Data.BEncode as BE |
6 | import Data.ByteString.Lazy as BL | 6 | import Data.ByteString.Lazy as BL |
7 | #if MIN_VERSION_iproute(1,7,4) | ||
8 | import Data.IP hiding (fromSockAddr) | ||
9 | #else | ||
7 | import Data.IP | 10 | import Data.IP |
11 | #endif | ||
8 | import Data.Serialize as S | 12 | import Data.Serialize as S |
9 | import Data.String | 13 | import Data.String |
10 | import Data.Text.Encoding as T | 14 | import Data.Text.Encoding as T |
@@ -302,4 +306,4 @@ spec = do | |||
302 | fingerprint "-ML2.7.2-xxxxxxxxxxx" `shouldBe` "MLdonkey-0" | 306 | fingerprint "-ML2.7.2-xxxxxxxxxxx" `shouldBe` "MLdonkey-0" |
303 | 307 | ||
304 | -- TODO XBT, Bits on Wheels, Queen Bee, BitTyrant, TorrenTopia, | 308 | -- TODO XBT, Bits on Wheels, Queen Bee, BitTyrant, TorrenTopia, |
305 | -- BitSpirit, Rufus, G3 Torrent, FlashGet \ No newline at end of file | 309 | -- BitSpirit, Rufus, G3 Torrent, FlashGet |