1 files changed, 1 insertions, 1 deletions

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