diff options
Diffstat (limited to 'exsamples/Main.hs')
-rw-r--r-- | exsamples/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/exsamples/Main.hs b/exsamples/Main.hs index 4eb09043..d0404405 100644 --- a/exsamples/Main.hs +++ b/exsamples/Main.hs | |||
@@ -18,7 +18,7 @@ main = do | |||
18 | print (contentLayout "./" (tInfo torrent)) | 18 | print (contentLayout "./" (tInfo torrent)) |
19 | 19 | ||
20 | client <- newClient 100 [] | 20 | client <- newClient 100 [] |
21 | swarm <- newLeacher client torrent | 21 | swarm <- newLeecher client torrent |
22 | 22 | ||
23 | ref <- liftIO $ newIORef 0 | 23 | ref <- liftIO $ newIORef 0 |
24 | discover swarm $ do | 24 | discover swarm $ do |