[BACK]Return to CurrentTorrents.pl CVS log [TXT][DIR] Up to [local] / openbsd / OpenBSDTorrents

Diff for /openbsd/OpenBSDTorrents/CurrentTorrents.pl between version 1.29 and 1.30

version 1.29, 2010/01/08 17:18:35 version 1.30, 2010/02/25 18:03:01
Line 1 
Line 1 
 #!/usr/bin/perl -T  #!/usr/bin/perl -T
 #$RedRiver: CurrentTorrents.pl,v 1.28 2010/01/05 19:55:22 andrew Exp $  #$RedRiver: CurrentTorrents.pl,v 1.29 2010/01/08 17:18:35 andrew Exp $
 use strict;  use strict;
 use warnings;  use warnings;
 use diagnostics;  use diagnostics;
Line 97 
Line 97 
   
     my $cn = $files{torrent}{$name};      my $cn = $files{torrent}{$name};
   
 EPOCH: foreach my $epoch ( sort { $b <=> $a } keys %{$cn} ) {  EPOCH: foreach my $epoch ( sort { $a <=> $b } keys %{$cn} ) {
         my $ct = $cn->{$epoch};          my $ct = $cn->{$epoch};
         my $cf = $ct->{path};          my $cf = $ct->{path};
   

Legend:
Removed from v.1.29  
changed lines
  Added in v.1.30

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>