diff options
Diffstat (limited to 'bug_form.pl')
-rw-r--r-- | bug_form.pl | 24 |
1 files changed, 18 insertions, 6 deletions
diff --git a/bug_form.pl b/bug_form.pl index c563daf06..665d82f62 100644 --- a/bug_form.pl +++ b/bug_form.pl @@ -111,7 +111,7 @@ my $id = $::FORM{'id'}; my $query = " select - bug_id, + bugs.bug_id, product, version, rep_platform, @@ -130,10 +130,12 @@ select status_whiteboard, date_format(creation_ts,'Y-m-d'), groupset, - delta_ts -from bugs -where bug_id = $id -and bugs.groupset & $::usergroupset = bugs.groupset"; + delta_ts, + sum(votes.count) +from bugs left join votes using(bug_id) +where bugs.bug_id = $id +and bugs.groupset & $::usergroupset = bugs.groupset +group by bugs.bug_id"; SendSQL($query); my %bug; @@ -145,7 +147,7 @@ if (@row = FetchSQLData()) { "bug_severity", "component", "assigned_to", "reporter", "bug_file_loc", "short_desc", "target_milestone", "qa_contact", "status_whiteboard", "creation_ts", - "groupset", "delta_ts") { + "groupset", "delta_ts", "votes") { $bug{$field} = shift @row; if (!defined $bug{$field}) { $bug{$field} = ""; @@ -368,6 +370,16 @@ if (Param("usedependencies")) { print "</tr></table>\n"; } +if ($::prodmaxvotes{$bug{'product'}}) { + print qq{ +<table><tr> +<th><a href="votehelp.html">Votes</a> for bug $id:</th><td> +<a href="showvotes.cgi?bug_id=$id">$bug{'votes'}</a> + <a href="showvotes.cgi?voteon=$id">Vote for this bug</a> +</td></tr></table> +}; +} + print " <br> <B>Additional Comments:</B> |