Remove leftovers from old color determination scheme.

Tune the speed at which colors change.
This commit is contained in:
des 2003-11-12 08:37:10 +00:00
parent 0e0b11491b
commit aabfe725f2

View File

@ -33,8 +33,6 @@ use 5.006_001;
use strict;
use POSIX qw(strftime);
my $STALE = 8 * 3600;
my %BRANCHES;
my %ARCHES;
@ -121,7 +119,7 @@ MAIN:{
if (-f "$DIR/$log.brief") {
my @stat = stat("$DIR/$log.brief");
my $class = success("$DIR/$log.brief") ? "ok" : "fail";
my $age = int(($now - $stat[9]) / 7200);
my $age = int(($now - $stat[9]) / 1800);
$age = 9
if ($age > 9);
$class .= "-$age";