Francois Gouget : patches: Take the .testbot file Status into account.

[Alexandre Julliard]

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

Author: Francois Gouget 
Date:   Thu Jun 16 17:20:39 2022 +0200

patches: Take the .testbot file Status into account.

Signed-off-by: Francois Gouget 
Signed-off-by: Alexandre Julliard

---

patches/update | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/patches/update b/patches/update
index 5d20f2a1..494d2e15 100755
--- a/patches/update
+++ b/patches/update
@@ -210,7 +210,8 @@ foreach my $file (readdir DIR)
             {
                 utf8::decode($_);
                 last if /^$/;
-                if (/^Job-ID: (.*)$/) { $patch{"testjob"} = $1; }
+                if (/^Status: (.*)$/) { $patch{"testbot"} = $1; }
+                elsif (/^Job-ID: (.*)$/) { $patch{"testjob"} = $1; }
                 elsif (/^URL: (.*)$/) { $patch{"testurl"} = $1; }
             }
             close LOG;
@@ -254,7 +255,6 @@ sub assign_parent($)
         if ($patch->{"from_marvin"})
         {
             $parent->{"testbot"} = "<a href="data/$patch->{id}">Failed</a>";
-            $parent->{"testclass"} = "testbot botfail";
         }
         return $parent;
     }
@@ -320,6 +320,10 @@ foreach my $file (sort { $patches{$b}->{"order"} <=> $patches{$a}->{"order"} } k
     {
         printf INDEX "<td class="failmark">X</td>";
     }
+    if ($patch->{"testbot"} and $patch->{"testbot"} ne "OK")
+    {
+        $patch->{"testclass"} .= " botfail";
+    }
     printf INDEX "<td class="%s">%s</td>", $patch->{"testclass"}, $patch->{"testbot"};
     if ($patch->{"testjob"} && $patch->{"testurl"})
     {