===================================================================
RCS file: /cvs/openbsd/OpenBSDTorrents/ServerTorrents.pl,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- openbsd/OpenBSDTorrents/ServerTorrents.pl	2005/05/06 21:05:00	1.15
+++ openbsd/OpenBSDTorrents/ServerTorrents.pl	2005/05/07 20:01:01	1.16
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-#$Id: ServerTorrents.pl,v 1.15 2005/05/06 20:05:00 andrew Exp $
+#$Id: ServerTorrents.pl,v 1.16 2005/05/07 19:01:01 andrew Exp $
 use strict;
 use warnings;
 use diagnostics;
@@ -119,7 +119,7 @@
 	my $t;
         eval {
 		$t = BT::MetaInfo::Cached->new(
-			$torrent,
+			$file,
 			{
 				cache_root =>
 				$OBT->{DIR_HOME} . '/FileCache'