Francois Gouget : testbot/web: Small formatting tweaks.

[Alexandre Julliard]

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

Author: Francois Gouget <fgouget at codeweavers.com>
Date:   Thu Jul 12 16:56:18 2018 +0200

testbot/web: Small formatting tweaks.

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

---

 testbot/web/JobDetails.pl | 11 +++--------
 1 file changed, 3 insertions(+), 8 deletions(-)

diff --git a/testbot/web/JobDetails.pl b/testbot/web/JobDetails.pl
index 28601d0..3fcec5d 100644
--- a/testbot/web/JobDetails.pl
+++ b/testbot/web/JobDetails.pl
@@ -393,21 +393,16 @@ sub GenerateBody($)
     my $LogName = $MoreInfo->{Full} || $MoreInfo->{Logs}->[0] || "log";
     my $ErrName = $LogName eq "log.old" ? "err.old" : "err";
 
-    my ($EmptyDiag, $LogFirst);
+    my ($EmptyDiag, $LogFirst) = (undef, 1);
     if (open(my $LogFile, "<", "$TaskDir/$LogName"))
     {
       my $HasLogEntries;
-      my $CurrentDll = "";
-      my $PrintedDll = "";
-      $LogFirst = 1;
+      my ($CurrentDll, $PrintedDll) = ("", "");
       foreach my $Line (<$LogFile>)
       {
         $HasLogEntries = 1;
         chomp $Line;
-        if ($Line =~ m/^([^:]+):[^ ]+ start [^ ]+ -\s*$/)
-        {
-          $CurrentDll = $1;
-        }
+        $CurrentDll = $1 if ($Line =~ m/^([_.a-z0-9-]+):[_a-z0-9]* start /);
         my $Html = $self->GetHtmlLine($MoreInfo->{Full}, $Line);
         next if (!defined $Html);