diff options
author | Sam Truzjan <pxqr.sta@gmail.com> | 2014-02-12 19:00:33 +0400 |
---|---|---|
committer | Sam Truzjan <pxqr.sta@gmail.com> | 2014-02-12 19:00:33 +0400 |
commit | 920dd0a8eb40ec65f794fd6480835a14066d8a99 (patch) | |
tree | 810e824d3ecd65bbc745cd94386bd9ce08a5e2b7 /examples/Client.hs | |
parent | 59b812124590dc4d4d11b51dff4073b495231363 (diff) |
Initialize exchange session fields
Diffstat (limited to 'examples/Client.hs')
-rw-r--r-- | examples/Client.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/Client.hs b/examples/Client.hs index 0ed4bb6f..320b4269 100644 --- a/examples/Client.hs +++ b/examples/Client.hs | |||
@@ -21,6 +21,6 @@ main = do | |||
21 | path <- parseArgs | 21 | path <- parseArgs |
22 | torrent <- fromFile path | 22 | torrent <- fromFile path |
23 | simpleClient $ do | 23 | simpleClient $ do |
24 | h <- openTorrent torrent | 24 | h <- openTorrent "data" torrent |
25 | start h | 25 | start h |
26 | liftIO $ threadDelay 10000000000 | 26 | liftIO $ threadDelay 10000000000 |