From 6f1cb53a2d3d74f2dd29334879ca66eb0fe91ec6 Mon Sep 17 00:00:00 2001 From: "justdave%syndicomm.com" <> Date: Wed, 12 Feb 2003 16:21:39 +0000 Subject: Bug 58020: include bug summaries in whinemail. Patch by pbaker@where2getit.com (Paul Baker) r= jouni, a= justdave --- whineatnews.pl | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) (limited to 'whineatnews.pl') diff --git a/whineatnews.pl b/whineatnews.pl index 2a3bdf1b9..a0a30205e 100755 --- a/whineatnews.pl +++ b/whineatnews.pl @@ -32,19 +32,24 @@ require "globals.pl"; ConnectToDatabase(); -SendSQL("select bug_id,login_name from bugs,profiles where " . +SendSQL("select bug_id,short_desc,login_name from bugs,profiles where " . "bug_status = 'NEW' and to_days(now()) - to_days(delta_ts) > " . Param('whinedays') . " and userid=assigned_to order by bug_id"); my %bugs; +my %desc; my @row; while (@row = FetchSQLData()) { - my ($id, $email) = (@row); + my ($id, $desc, $email) = (@row); if (!defined $bugs{$email}) { $bugs{$email} = []; } + if (!defined $desc{$email}) { + $desc{$email} = []; + } push @{$bugs{$email}}, $id; + push @{$desc{$email}}, $desc; } @@ -59,7 +64,8 @@ foreach my $email (sort (keys %bugs)) { my $msg = PerformSubsts($template, \%substs); foreach my $i (@{$bugs{$email}}) { - $msg .= " ${urlbase}show_bug.cgi?id=$i\n" + $msg .= " " . shift(@{$desc{$email}}) . "\n"; + $msg .= " -> ${urlbase}show_bug.cgi?id=$i\n"; } my $sendmailparam = Param('sendmailnow') ? '' : "-ODeliveryMode=deferred"; -- cgit v1.2.3-24-g4f1b