Francois Gouget : testbot: Retrieve the list of Wine files.

[Alexandre Julliard]

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

Author: Francois Gouget <fgouget at codeweavers.com>
Date:   Wed Jun 20 02:32:19 2018 +0200

testbot: Retrieve the list of Wine files.

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

---

 testbot/bin/WineRunReconfig.pl | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/testbot/bin/WineRunReconfig.pl b/testbot/bin/WineRunReconfig.pl
index fe69fc3..d04b780 100755
--- a/testbot/bin/WineRunReconfig.pl
+++ b/testbot/bin/WineRunReconfig.pl
@@ -444,6 +444,16 @@ if ($NewStatus eq "completed")
   {
     $TAError = "An error occurred while retrieving the test list: ". $TA->GetLastError();
   }
+
+  Debug(Elapsed($Start), " Retrieving the list of Wine files '$TaskDir/winefiles.txt'\n");
+  if ($TA->GetFile("latest/winefiles.txt", "$TaskDir/winefiles.txt"))
+  {
+    copy "$TaskDir/winefiles.txt", "$DataDir/latest/winefiles.txt";
+  }
+  elsif (!defined $TAError)
+  {
+    $TAError = "An error occurred while retrieving the list of Wine files: ". $TA->GetLastError();
+  }
 }
 
 $TA->Disconnect();