From 124e7a6c0c74bea236cd1270c694588308c55667 Mon Sep 17 00:00:00 2001
From: "kestes%walrus.com" <kestes%walrus.com>
Date: Mon, 6 May 2002 20:45:18 +0000
Subject: [PATCH] fixes to how trim_db is called, and to make sure we get fresh
 estimate data.

---
 webtools/tinderbox2/src/lib/TinderDB/Build.pm | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/webtools/tinderbox2/src/lib/TinderDB/Build.pm b/webtools/tinderbox2/src/lib/TinderDB/Build.pm
index 778e21fcea70..e9daf0eca3e6 100755
--- a/webtools/tinderbox2/src/lib/TinderDB/Build.pm
+++ b/webtools/tinderbox2/src/lib/TinderDB/Build.pm
@@ -7,8 +7,8 @@
 # the build was and display a link to the build log.
 
 
-# $Revision: 1.46 $ 
-# $Date: 2002/05/06 18:37:00 $ 
+# $Revision: 1.47 $ 
+# $Date: 2002/05/06 20:45:18 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/lib/TinderDB/Build.pm,v $ 
 # $Name:  $ 
@@ -473,10 +473,12 @@ sub trim_db_history {
     # medians are a more robust statistical estimator then the mean.
     # They will give us better answers then a typical "average"
 
+    delete $DATABASE{$tree}{$buildname}{'average_buildtime'};
     my $run_avg = main::median(@run_times);
     ($run_avg) &&
       ( $DATABASE{$tree}{$buildname}{'average_buildtime'} = $run_avg);
     
+    delete $DATABASE{$tree}{$buildname}{'average_deadtime'};
     my $dead_avg = main::median(@dead_times);
     ($dead_avg) &&
       ( $DATABASE{$tree}{$buildname}{'average_deadtime'} = $dead_avg);
@@ -1029,7 +1031,7 @@ sub apply_db_updates {
         $TinderDB::MAX_UPDATES_SINCE_TRIM)
      ) {
     $METADATA{$tree}{'updates_since_trim'}=0;
-    $self->trim_db_history(@_);
+    $self->trim_db_history($tree);
   }
 
 
@@ -1261,7 +1263,7 @@ sub status_table_row {
 
     if ($current_rec->{'print'}) {
         $links .= (
-                   "\t\t". 
+                   "\t\t\t". 
                    $current_rec->{'print'}.
                    "\n".
                    "");