From 3c1433816b54154345bc1b1929958d8a544b8034 Mon Sep 17 00:00:00 2001
From: "kestes%walrus.com"
 <kestes%walrus.com@18797224-902f-48f8-a5cc-f745e15eee43>
Date: Sun, 18 Jul 2004 16:43:27 +0000
Subject: [PATCH] put a link back to the main tinderbox page.

git-svn-id: svn://10.0.0.236/trunk@159424 18797224-902f-48f8-a5cc-f745e15eee43
---
 mozilla/webtools/tinderbox2/src/bin/tinder.cgi | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/mozilla/webtools/tinderbox2/src/bin/tinder.cgi b/mozilla/webtools/tinderbox2/src/bin/tinder.cgi
index 6c356ac58f5..5b4477dd85b 100755
--- a/mozilla/webtools/tinderbox2/src/bin/tinder.cgi
+++ b/mozilla/webtools/tinderbox2/src/bin/tinder.cgi
@@ -2,8 +2,8 @@
 # -*- Mode: perl; indent-tabs-mode: nil -*-
 #
 
-# $Revision: 1.36 $ 
-# $Date: 2003-08-17 16:23:59 $ 
+# $Revision: 1.37 $ 
+# $Date: 2004-07-18 16:43:27 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/befator/cvs/jail/cvsroot/mozilla/webtools/tinderbox2/src/bin/tinder.cgi,v $ 
 # $Name: not supported by cvs2svn $ 
@@ -350,6 +350,11 @@ sub HTML_status_page {
                            "\?".
                            "tree=$tree"),
                   ).
+  "<br>\n".
+    HTMLPopUp::Link(
+                    "linktxt"=>"Tinderbox Index", 
+                    "href"=>("$FileStructure::URLS{'indexpage'}"),
+                    ).
   "<br>\n";
   my ($links) = 
     HTMLPopUp::Link(