Alexandre Julliard : testbot: Add status and URL fields to the test result file.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: 1c345024e5706af0bffdf7286acb11971b9f8937
URL:    http://source.winehq.org/git/tools.git/?a=commit;h=1c345024e5706af0bffdf7286...

Author: Alexandre Julliard <julliard(a)winehq.org>
Date:   Thu Aug 29 16:33:46 2013 +0200

testbot: Add status and URL fields to the test result file.

---

 testbot/bin/WineSendLog.pl |    4 ++++
 1 files changed, 4 insertions(+), 0 deletions(-)

diff --git a/testbot/bin/WineSendLog.pl b/testbot/bin/WineSendLog.pl
index 3c3ff8c..ce69c21 100755
--- a/testbot/bin/WineSendLog.pl
+++ b/testbot/bin/WineSendLog.pl
@@ -466,6 +466,10 @@ EOF
     }
     if (open (my $result, ">", "$BaseName.testbot"))
     {
+      print $result "Status: " . ($Messages ? "Failed" : "OK") . "\n";
+      print $result "Job-ID: " . $Job->Id . "\n";
+      print $result "URL: http://$WebHostName/JobDetails.pl?Key=" . $Job->GetKey() . "\n";
+
       foreach my $Key (@SortedKeys)
       {
         my $StepTask = $StepsTasks->GetItem($Key);