[tools] testbot/web: Don't assume that "/index.pl" is the TestBot landing page.
Francois Gouget
fgouget at codeweavers.com
Mon Mar 7 05:48:05 CST 2022
Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
---
testbot/lib/WineTestBot/CGI/PageBase.pm | 4 ++--
testbot/web/JobDetails.pl | 2 +-
testbot/web/Login.pl | 2 +-
testbot/web/Submit.pl | 2 +-
4 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/testbot/lib/WineTestBot/CGI/PageBase.pm b/testbot/lib/WineTestBot/CGI/PageBase.pm
index 5f61466908..d38e8d96b6 100644
--- a/testbot/lib/WineTestBot/CGI/PageBase.pm
+++ b/testbot/lib/WineTestBot/CGI/PageBase.pm
@@ -244,7 +244,7 @@ ${ProjectName} Test Bot
<div id="menu">
<ul>
<li class='top'><p>Test Bot</p></li>
- <li><p><a href='/index.pl'>Home</a></p></li>
+ <li><p><a href='/'>Home</a></p></li>
EOF
if (defined($PatchesMailingList))
{
@@ -309,7 +309,7 @@ EOF
</div>
<div id='banner'>
<div id='Logo'>
- <a href='/index.pl'><img src='/${ProjectName}Logo.png' alt=''></a>
+ <a href='/'><img src='/${ProjectName}Logo.png' alt=''></a>
</div>
<div id='Project'>
<img src='/${ProjectName}Project.png' alt=''>
diff --git a/testbot/web/JobDetails.pl b/testbot/web/JobDetails.pl
index eef7a17838..919c7a5e3b 100644
--- a/testbot/web/JobDetails.pl
+++ b/testbot/web/JobDetails.pl
@@ -52,7 +52,7 @@ sub _initialize($$$)
$self->{Job} = CreateJobs()->GetItem($JobId);
if (!defined $self->{Job})
{
- $self->Redirect("/index.pl"); # does not return
+ $self->Redirect("/"); # does not return
}
$self->{JobId} = $JobId;
diff --git a/testbot/web/Login.pl b/testbot/web/Login.pl
index ef3f4cb064..d9757edb92 100644
--- a/testbot/web/Login.pl
+++ b/testbot/web/Login.pl
@@ -133,7 +133,7 @@ sub OnLogIn($)
my $Target = $self->GetParam("Target");
if (! defined($Target) || $Target eq "" || substr($Target, 0, 1) ne "/")
{
- $Target = "/index.pl";
+ $Target = "/";
}
$self->Redirect(MakeSecureURL($Target)); # does not return
exit;
diff --git a/testbot/web/Submit.pl b/testbot/web/Submit.pl
index 9a7ac0b3e7..98d13381e0 100644
--- a/testbot/web/Submit.pl
+++ b/testbot/web/Submit.pl
@@ -1329,7 +1329,7 @@ sub OnOK($)
}
else
{
- $self->Redirect("/index.pl"); # does not return
+ $self->Redirect("/"); # does not return
}
}
--
2.30.2
More information about the wine-devel
mailing list