diff options
Diffstat (limited to 'tests/Network/BitTorrent/DHT/QuerySpec.hs')
-rw-r--r-- | tests/Network/BitTorrent/DHT/QuerySpec.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/Network/BitTorrent/DHT/QuerySpec.hs b/tests/Network/BitTorrent/DHT/QuerySpec.hs index 33114b40..d25bd120 100644 --- a/tests/Network/BitTorrent/DHT/QuerySpec.hs +++ b/tests/Network/BitTorrent/DHT/QuerySpec.hs | |||
@@ -18,7 +18,7 @@ import Network.BitTorrent.DHT.TestData | |||
18 | 18 | ||
19 | 19 | ||
20 | myAddr :: NodeAddr IPv4 | 20 | myAddr :: NodeAddr IPv4 |
21 | myAddr = "0.0.0.0:8000" | 21 | myAddr = "0.0.0.0:0" |
22 | 22 | ||
23 | nullLogger :: LogFun | 23 | nullLogger :: LogFun |
24 | nullLogger _ _ _ _ = return () | 24 | nullLogger _ _ _ _ = return () |
@@ -37,7 +37,7 @@ getBootInfo = do | |||
37 | simpleDHT [] $ pingQ startAddr | 37 | simpleDHT [] $ pingQ startAddr |
38 | 38 | ||
39 | spec :: Spec | 39 | spec :: Spec |
40 | spec = do | 40 | spec = parallel $ do |
41 | describe "environment" $ do | 41 | describe "environment" $ do |
42 | describe "test node" $ do | 42 | describe "test node" $ do |
43 | it "is alive" $ do | 43 | it "is alive" $ do |