diff options
author | lpsolit%gmail.com <> | 2006-04-07 05:26:28 +0000 |
---|---|---|
committer | lpsolit%gmail.com <> | 2006-04-07 05:26:28 +0000 |
commit | 5de2bb1d2561764555836986416b9e4e58eec047 (patch) | |
tree | 20433efa5d851889c8f12c3c6ede901175696786 /whineatnews.pl | |
parent | Bug 332906: Wrong parameters passed to sudo sessions when trying to bypass va... (diff) | |
download | bugzilla-5de2bb1d2561764555836986416b9e4e58eec047.tar.gz bugzilla-5de2bb1d2561764555836986416b9e4e58eec047.tar.bz2 bugzilla-5de2bb1d2561764555836986416b9e4e58eec047.zip |
Bug 303690: Eliminate deprecated Bugzilla::DB routines from collectstats.pl and whineatnews.pl - Patch by Gabriel Sales de Oliveira <gabriel@async.com.br> r=LpSolit a=justdave
Diffstat (limited to 'whineatnews.pl')
-rwxr-xr-x | whineatnews.pl | 24 |
1 files changed, 14 insertions, 10 deletions
diff --git a/whineatnews.pl b/whineatnews.pl index 50e06383e..62e6388ac 100755 --- a/whineatnews.pl +++ b/whineatnews.pl @@ -32,6 +32,7 @@ use lib '.'; require "globals.pl"; +use Bugzilla; use Bugzilla::BugMail; use Bugzilla::Util; @@ -39,20 +40,23 @@ use Bugzilla::Util; exit unless Param('whinedays') >= 1; my $dbh = Bugzilla->dbh; -SendSQL("SELECT bug_id, short_desc, login_name " . - "FROM bugs INNER JOIN profiles ON userid = assigned_to " . - "WHERE (bug_status = 'NEW' OR bug_status = 'REOPENED') " . - "AND " . $dbh->sql_to_days('NOW()') . " - " . - $dbh->sql_to_days('delta_ts') . " > " . - Param('whinedays') . " " . - "ORDER BY bug_id"); +my $query = q{SELECT bug_id, short_desc, login_name + FROM bugs + INNER JOIN profiles + ON userid = assigned_to + WHERE (bug_status = ? OR bug_status = ?) + AND } . $dbh->sql_to_days('NOW()') . " - " . + $dbh->sql_to_days('delta_ts') . " > " . + Param('whinedays') . + " ORDER BY bug_id"; my %bugs; my %desc; -my @row; -while (@row = FetchSQLData()) { - my ($id, $desc, $email) = (@row); +my $slt_bugs = $dbh->selectall_arrayref($query, undef, 'NEW', 'REOPENED'); + +foreach my $bug (@$slt_bugs) { + my ($id, $desc, $email) = @$bug; if (!defined $bugs{$email}) { $bugs{$email} = []; } |