[tools] testbot/web: Show the web patch id as a tooltip.

[Francois Gouget]

This helps cross-reference the TestBot patch list with the jobs and
patches website.

Signed-off-by: Francois Gouget 
---
 testbot/web/PatchesList.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/testbot/web/PatchesList.pl b/testbot/web/PatchesList.pl
index fc074ada1a..bf7c52b203 100644
--- a/testbot/web/PatchesList.pl
+++ b/testbot/web/PatchesList.pl
@@ -53,7 +53,9 @@ sub GenerateDataView($$$)
       $Row->{Item}->Disposition =~ /job ([0-9]+)$/)
   {
     my $JobId = $1;
-    print "<a href='/JobDetails.pl?Key=$JobId'>Job $JobId</a>";
+    my $Title = $Row->{Item}->WebPatchId;
+    $Title = " title='Web patch $Title'" if ($Title);
+    print "<a href='/JobDetails.pl?Key=$JobId'$Title>Job $JobId</a>";
   }
   else
   {