diff options
| author | Sam Truzjan <pxqr.sta@gmail.com> | 2014-01-23 02:57:05 +0400 |
|---|---|---|
| committer | Sam Truzjan <pxqr.sta@gmail.com> | 2014-01-23 02:57:05 +0400 |
| commit | fa496de77c97548797298b06f199b2eaf8a46c41 (patch) | |
| tree | e53e3c38f6c3916f381148d6686ffc85d879bcc5 /examples | |
| parent | f8d1ac253a6033048518e7c153ccbd10d894b466 (diff) | |
Add class MonadBitTorrent
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/Client.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/Client.hs b/examples/Client.hs index efafba72..67fed62e 100644 --- a/examples/Client.hs +++ b/examples/Client.hs | |||
| @@ -12,6 +12,6 @@ main :: IO () | |||
| 12 | main = do | 12 | main = do |
| 13 | [path] <- getArgs | 13 | [path] <- getArgs |
| 14 | torrent <- fromFile path | 14 | torrent <- fromFile path |
| 15 | client <- newClient def | 15 | client <- newClient def $ \ _ _ _ _ -> return () |
| 16 | addTorrent torrent client | 16 | -- addTorrent torrent client |
| 17 | return () \ No newline at end of file | 17 | return () \ No newline at end of file |