1 files changed, 3 insertions, 0 deletions
diff --git a/examples/Main.hs b/examples/Main.hs
index 1d3b711b..b8e3c11f 100644
--- a/examples/Main.hs
+++ b/examples/Main.hs
@@ -8,3 +8,6 @@ main = do
  [path]  <- getArgs
  torrent <- fromFile path
  print (contentLayout "./" (tInfo torrent))
+  withDefaultClient 3000 3001 $ \ client ->
+    addTorrent client $ TorrentLoc path "/tmp"

diff --git a/examples/Main.hs b/examples/Main.hs index 1d3b711b..b8e3c11f 100644 --- a/examples/Main.hs +++ b/examples/Main.hs
@@ -8,3 +8,6 @@ main = do
8	[path] <- getArgs	8	[path] <- getArgs
9	torrent <- fromFile path	9	torrent <- fromFile path
10	print (contentLayout "./" (tInfo torrent))	10	print (contentLayout "./" (tInfo torrent))
		11
		12	withDefaultClient 3000 3001 $ \ client ->
		13	addTorrent client $ TorrentLoc path "/tmp"