summaryrefslogtreecommitdiff
path: root/tests/Network/BitTorrent/DHT/SessionSpec.hs
diff options
context:
space:
mode:
Diffstat (limited to 'tests/Network/BitTorrent/DHT/SessionSpec.hs')
-rw-r--r--tests/Network/BitTorrent/DHT/SessionSpec.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/Network/BitTorrent/DHT/SessionSpec.hs b/tests/Network/BitTorrent/DHT/SessionSpec.hs
index 41852763..b3b9a9fc 100644
--- a/tests/Network/BitTorrent/DHT/SessionSpec.hs
+++ b/tests/Network/BitTorrent/DHT/SessionSpec.hs
@@ -39,10 +39,10 @@ spec :: Spec
39spec = do 39spec = do
40 describe "session" $ do 40 describe "session" $ do
41 it "is active until stopNode called" $ do 41 it "is active until stopNode called" $ do
42 node <- startNode [] def myAddr nullLogger 42 node <- newNode [] def myAddr nullLogger
43 runDHT node monadActive `shouldReturn` True 43 runDHT node monadActive `shouldReturn` True
44 runDHT node monadActive `shouldReturn` True 44 runDHT node monadActive `shouldReturn` True
45 stopNode node 45 closeNode node
46 runDHT node monadActive `shouldReturn` False 46 runDHT node monadActive `shouldReturn` False
47 47
48 describe "tokens" $ do 48 describe "tokens" $ do