[PATCH] testbot/WineRunWineTest: Use the new WineTest command line options.

[Francois Gouget]

Signed-off-by: Francois Gouget 
---
 testbot/bin/WineRunWineTest.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/testbot/bin/WineRunWineTest.pl b/testbot/bin/WineRunWineTest.pl
index 6c0c923c9..ac5594654 100755
--- a/testbot/bin/WineRunWineTest.pl
+++ b/testbot/bin/WineRunWineTest.pl
@@ -428,7 +428,7 @@ if ($Step->Type eq "suite")
   my $Tag = lc($VM->Name);
   $Tag =~ s/^$TagPrefix//;
   $Tag =~ s/[^a-zA-Z0-9]/-/g;
-  $Script .= $Task->CmdLineArg .",submit winetest $TagPrefix-$Tag ";
+  $Script .= "--winetest ". $Task->CmdLineArg ." $TagPrefix-$Tag ";
   if (defined $WebHostName)
   {
     my $StepTask = 100 * $StepNo + $TaskNo;
@@ -444,7 +444,7 @@ if ($Step->Type eq "suite")
 }
 else
 {
-  $Script .= $Task->CmdLineArg ." build patch.diff";
+  $Script .= "--testpatch ". $Task->CmdLineArg ." patch.diff";
 }
 $Script .= "\n) >Task.log 2>&1\n";
 Debug(Elapsed($Start), " Sending the script: [$Script]\n");