Francois Gouget : testbot/web: Allow getting the VMs configuration on the main page.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: f0fbb85fd4645e05d1aead1154ebcd5630f482cb
URL:    https://gitlab.winehq.org/winehq/tools/-/commit/f0fbb85fd4645e05d1aead1154eb...

Author: Francois Gouget 
Date:   Fri Aug  4 12:25:09 2023 +0200

testbot/web: Allow getting the VMs configuration on the main page.

Provide access to the configuration through the same expansion mechanism
as in the submit and job details pages.

---

testbot/web/index.pl | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/testbot/web/index.pl b/testbot/web/index.pl
index a2bd5246..9d7cd976 100644
--- a/testbot/web/index.pl
+++ b/testbot/web/index.pl
@@ -242,6 +242,24 @@ sub DisplayProperty($$)
          "";
 }

+sub GenerateDataView($$$)
+{
+  my ($self, $Row, $Col) = @_;
+
+  my $PropertyName = $Col->{Descriptor}->GetName();
+  if ($PropertyName eq "Description")
+  {
+    my $VM = $Row->{Item};
+    print "<details><summary>",
+          $self->escapeHTML($VM->Description || $VM->Name),
+          "</summary>", $self->escapeHTML($VM->Details || "No details!"),
+          "</details>";
+  }
+  else
+  {
+    $self->SUPER::GenerateDataView($Row, $Col);
+  }
+}

package StatusPage;