From 5a6e5634452ff463a7442dbd8761678651517d20 Mon Sep 17 00:00:00 2001 From: Sam T Date: Sun, 14 Jul 2013 03:25:46 +0400 Subject: ~ Minor changes. --- tests/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tests') diff --git a/tests/Main.hs b/tests/Main.hs index adb50380..c0ef52db 100644 --- a/tests/Main.hs +++ b/tests/Main.hs @@ -118,7 +118,7 @@ instance Arbitrary ContentInfo where ] instance Arbitrary Torrent where - arbitrary = torrent <$> arbitrary + arbitrary = mktorrent <$> arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*> pure Nothing <*> arbitrary -- cgit v1.2.3