summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Palfrader <peter@palfrader.org>2002-06-22 23:36:32 +0000
committerPeter Palfrader <peter@palfrader.org>2002-06-22 23:36:32 +0000
commit70e1a3e8ee7bbb46c5f04a696732558ab0f78699 (patch)
treec04f513f56cfe9e61169b578e956e703004151f8
parent0b6436386f81876795ccebc1d51739d1bd741b8e (diff)
Also sort by nick if reliablity is the same
a day is a day now
-rw-r--r--Echolot/Stats.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/Echolot/Stats.pm b/Echolot/Stats.pm
index 142a4b2..8907034 100644
--- a/Echolot/Stats.pm
+++ b/Echolot/Stats.pm
@@ -1,7 +1,7 @@
package Echolot::Stats;
# (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: Stats.pm,v 1.5 2002/06/20 04:29:06 weasel Exp $
+# $Id: Stats.pm,v 1.6 2002/06/22 23:36:32 weasel Exp $
#
=pod
@@ -22,7 +22,7 @@ use warnings;
use Carp qw{cluck};
use constant DAYS => 12;
-use constant SECS_PER_DAY => 3 * 60 * 60;
+use constant SECS_PER_DAY => 24 * 60 * 60;
#use constant DAYS => 12;
#use constant SECS_PER_DAY => 24 * 60 * 60;
@@ -372,7 +372,8 @@ sub build_rems($) {
my @rems =
sort {
- - ($a->{'stats'}->{'avr_reliability'} <=> $b->{'stats'}->{'avr_reliability'})
+ - ($a->{'stats'}->{'avr_reliability'} <=> $b->{'stats'}->{'avr_reliability'}) ||
+ ($a->{'nick'} cmp $b->{'nick'})
} map { $rems{$_} } keys %rems;
return \@rems;