Francois Gouget : testbot/web: Use <thead> for the CollectionBlock table headers.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: 0b2642d3c6c4e5ebd89e0aa2ea08de4dddb6c5b8
URL:    https://source.winehq.org/git/tools.git/?a=commit;h=0b2642d3c6c4e5ebd89e0aa2ea08de4dddb6c5b8

Author: Francois Gouget <fgouget at codeweavers.com>
Date:   Mon Mar  8 01:50:50 2021 +0100

testbot/web: Use <thead> for the CollectionBlock table headers.

It usually does not make any difference but is good practice.

Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 testbot/lib/ObjectModel/CGI/CollectionBlock.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/testbot/lib/ObjectModel/CGI/CollectionBlock.pm b/testbot/lib/ObjectModel/CGI/CollectionBlock.pm
index b523d14..058bb47 100644
--- a/testbot/lib/ObjectModel/CGI/CollectionBlock.pm
+++ b/testbot/lib/ObjectModel/CGI/CollectionBlock.pm
@@ -107,10 +107,12 @@ EOF
 
   print "<table border='0' cellpadding='5' cellspacing='0' summary='" .
         "Overview of " . $Collection->GetCollectionName() . "'>\n";
-  print "<tbody>\n";
+  print "<thead>\n";
   my $Actions = $self->CallGetItemActions();
   $self->CallGenerateHeaderRow($PropertyDescriptors, $Actions);
+  print "</thead>\n";
 
+  print "<tbody>\n";
   my $DetailsPage = $self->CallGetDetailsPage();
   my $Row = 0;
   my $Keys = $self->CallSortKeys($self->{Collection}->GetKeys());