Test-suite build.

1 files changed, 3 insertions, 3 deletions

diff --git a/tests/Network/BitTorrent/DHTSpec.hs b/tests/Network/BitTorrent/DHTSpec.hs
index 30abc867..77160eb5 100644
--- a/tests/Network/BitTorrent/DHTSpec.hs
+++ b/tests/Network/BitTorrent/DHTSpec.hs
@@ -36,8 +36,8 @@ spec = do
     it "partial bootstrapping should finish in less than 10 seconds" $ do
       node <- resolveHostName (L.head defaultBootstrapNodes)
       res  <- timeout partialBootstrapTimeout $ do
-                dht opts def $ do
-                  bootstrap [node]
+                dht opts def fullLogging $ do
+                  bootstrap Nothing [node]
                   isBootstrapped
       res `shouldBe` Just True
 
@@ -57,4 +57,4 @@ spec = do
       pending
 
   describe "delete" $ do
-    return ()
\ No newline at end of file
+    return ()