1 files changed, 1 insertions, 1 deletions
diff --git a/exsamples/Main.hs b/exsamples/Main.hs
index 9ed311ae..ebc81b02 100644
--- a/exsamples/Main.hs
+++ b/exsamples/Main.hs
@@ -15,7 +15,7 @@ main = do
  [path]  <- getArgs
  torrent <- fromFile path
-  client  <- defaultClient
+  client  <- newClient 2 []
  swarm   <- newLeacher  client torrent
  discover swarm $ do

diff --git a/exsamples/Main.hs b/exsamples/Main.hs index 9ed311ae..ebc81b02 100644 --- a/exsamples/Main.hs +++ b/exsamples/Main.hs
@@ -15,7 +15,7 @@ main = do
15	[path] <- getArgs	15	[path] <- getArgs
16	torrent <- fromFile path	16	torrent <- fromFile path
17		17
18	client <- defaultClient	18	client <- newClient 2 []
19	swarm <- newLeacher client torrent	19	swarm <- newLeacher client torrent
20		20
21	discover swarm $ do	21	discover swarm $ do