From 58f4cd449ddf296fd0b9d1ff32155e55584bd2bd Mon Sep 17 00:00:00 2001
From: "mcafee%netscape.com"
 <mcafee%netscape.com@18797224-902f-48f8-a5cc-f745e15eee43>
Date: Tue, 27 Nov 2001 05:43:01 +0000
Subject: [PATCH] report startup times as an html link to the graph of previous
 runs

git-svn-id: svn://10.0.0.236/trunk@108987 18797224-902f-48f8-a5cc-f745e15eee43
---
 mozilla/tools/tinderbox/build-seamonkey-util.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/mozilla/tools/tinderbox/build-seamonkey-util.pl b/mozilla/tools/tinderbox/build-seamonkey-util.pl
index e5dbb05715b..86725598929 100644
--- a/mozilla/tools/tinderbox/build-seamonkey-util.pl
+++ b/mozilla/tools/tinderbox/build-seamonkey-util.pl
@@ -20,7 +20,7 @@ use File::Basename; # for basename();
 use Config; # for $Config{sig_name} and $Config{sig_num}
 
 
-$::UtilsVersion = '$Revision: 1.90 $ ';
+$::UtilsVersion = '$Revision: 1.91 $ ';
 
 package TinderUtils;
 
@@ -968,7 +968,8 @@ sub run_all_tests {
 		# print_log "\n\n  __avg_startuptime,$min_startuptime\n\n";
 		
 		my $min_startuptime_string = sprintf "%.2f", $min_startuptime/1000;
-		my $print_string = "\n\nTinderboxPrint:Ts:" . $min_startuptime_string . "s\n\n";
+		my $print_string = "\n\nTinderboxPrint:<a href=\"http://tegu.mozilla.org/graph/startup/query.cgi?tbox=" 
+		  . ::hostname() . "\">Ts:" . $min_startuptime_string . "s</a>\n\n";
 		print_log "$print_string";
 
 		# Report data back to server