=================================================================== RCS file: /cvs/openbsd/OpenBSDTorrents/MakeTorrents.pl,v retrieving revision 1.5 retrieving revision 1.7 diff -u -r1.5 -r1.7 --- openbsd/OpenBSDTorrents/MakeTorrents.pl 2005/03/23 00:08:18 1.5 +++ openbsd/OpenBSDTorrents/MakeTorrents.pl 2005/03/24 00:21:43 1.7 @@ -1,5 +1,5 @@ #!/usr/bin/perl -T -#$Id: MakeTorrents.pl,v 1.5 2005/03/23 00:08:18 andrew Exp $ +#$Id: MakeTorrents.pl,v 1.7 2005/03/24 00:21:43 andrew Exp $ use strict; use warnings; use diagnostics; @@ -13,7 +13,6 @@ use YAML; -my $BTMake = '/usr/local/bin/btmake'; my $Piece_Length = 18; my $MinFiles = 5; @@ -75,7 +74,10 @@ "Created by andrew fresh (andrew\@mad-techies.org)\n" . "http://OpenBSD.somedomain.net/"; - btmake($torrent, $comment, $files); + eval { btmake($torrent, $comment, $files); }; + if ($@) { + print "Error creating $torrent\n"; + } # system($BTMake, # '-C',