This makes it easier to identify them in the browser tabs. Signed-off-by: Francois Gouget <fgouget(a)codeweavers.com> --- testbot/web/Activity.pl | 7 +++++++ testbot/web/Stats.pl | 7 +++++++ testbot/web/admin/Log.pl | 8 ++++++++ 3 files changed, 22 insertions(+) diff --git a/testbot/web/Activity.pl b/testbot/web/Activity.pl index fa842d9f..bf7d6b9b 100644 --- a/testbot/web/Activity.pl +++ b/testbot/web/Activity.pl @@ -51,6 +51,13 @@ sub _initialize($$$) $self->{Method} = "get"; } +sub GetPageTitle($$) +{ + my ($self, $Page) = @_; + + return "Activity - ${ProjectName} Test Bot"; +} + sub GeneratePage($) { my ($self) = @_; diff --git a/testbot/web/Stats.pl b/testbot/web/Stats.pl index 2d426ac4..70e812db 100644 --- a/testbot/web/Stats.pl +++ b/testbot/web/Stats.pl @@ -40,6 +40,13 @@ sub _initialize($$$) $self->SUPER::_initialize($Request, $RequiredRole); } +sub GetPageTitle($$) +{ + my ($self, $Page) = @_; + + return "Statistics - ${ProjectName} Test Bot"; +} + sub _CompareVMs() { my ($aHost, $bHost) = ($a->GetHost(), $b->GetHost()); diff --git a/testbot/web/admin/Log.pl b/testbot/web/admin/Log.pl index 934bf256..f0ac5246 100644 --- a/testbot/web/admin/Log.pl +++ b/testbot/web/admin/Log.pl @@ -25,6 +25,7 @@ use ObjectModel::CGI::FreeFormPage; our @ISA = qw(ObjectModel::CGI::FreeFormPage); use ObjectModel::BasicPropertyDescriptor; +use WineTestBot::Config; use WineTestBot::Log; @@ -38,6 +39,13 @@ sub _initialize($$$) $self->SUPER::_initialize($Request, $RequiredRole, \@PropertyDescriptors); } +sub GetPageTitle($$) +{ + my ($self, $Page) = @_; + + return "Engine Log - ${ProjectName} Test Bot"; +} + sub GetPropertyValue($$) { my ($self, $PropertyDescriptor) = @_; -- 2.20.1