=================================================================== RCS file: /cvs/openbsd/OpenBSDTorrents/NewTorrents.pl,v retrieving revision 1.14 retrieving revision 1.15 diff -u -r1.14 -r1.15 --- openbsd/OpenBSDTorrents/NewTorrents.pl 2009/10/20 20:03:25 1.14 +++ openbsd/OpenBSDTorrents/NewTorrents.pl 2010/03/03 18:23:46 1.15 @@ -1,5 +1,5 @@ #!/usr/bin/perl -T -#$RedRiver: NewTorrents.pl,v 1.13 2007/11/02 02:35:07 andrew Exp $ +#$RedRiver: NewTorrents.pl,v 1.14 2009/10/20 19:03:25 andrew Exp $ use strict; use warnings; use diagnostics; @@ -80,10 +80,10 @@ return if ! %Need_Update; my $count = scalar keys %Need_Update; - print "Need to make $count waiting torrents\n"; + print "Have $count waiting torrents\n"; } else { - print "Need to make torrent for '$dir'\n"; + #print "Need to make torrent for '$dir'\n"; $dir = $OBT->{BASENAME} . "/$dir"; $Need_Update{$dir} = 1; }