add link back to the current status page from which ever status page

you are looking at.
This commit is contained in:
kestes%walrus.com 2001-12-03 19:50:00 +00:00
parent e80777fb94
commit fe5b24cccf

View File

@ -2,8 +2,8 @@
# -*- Mode: perl; indent-tabs-mode: nil -*- # -*- Mode: perl; indent-tabs-mode: nil -*-
# #
# $Revision: 1.18 $ # $Revision: 1.19 $
# $Date: 2001/10/18 16:19:59 $ # $Date: 2001/12/03 19:50:00 $
# $Author: kestes%walrus.com $ # $Author: kestes%walrus.com $
# $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/bin/tinder.cgi,v $ # $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/bin/tinder.cgi,v $
# $Name: $ # $Name: $
@ -286,6 +286,8 @@ sub HTML_status_page {
my ($times_vec, $tree, ) = @_; my ($times_vec, $tree, ) = @_;
my ($status_page_url) = (FileStructure::get_filename($tree, 'tree_URL').
"/status.html");
my ($out) = ''; my ($out) = '';
@ -368,6 +370,11 @@ sub HTML_status_page {
"start-time=$next_date\&". "start-time=$next_date\&".
"display-hours=$display_8hours"), "display-hours=$display_8hours"),
). ).
"<br>\n".
HTMLPopUp::Link(
"linktxt"=>"Show current status",
"href"=>$status_page_url,
).
"<br><p>\n\n". "<br><p>\n\n".
HTMLPopUp::Link( HTMLPopUp::Link(
"linktxt"=>"Add to Notice Board", "linktxt"=>"Add to Notice Board",