diff options
author | terry%netscape.com <> | 1999-03-06 04:05:53 +0000 |
---|---|---|
committer | terry%netscape.com <> | 1999-03-06 04:05:53 +0000 |
commit | 04fa4c5f8080d8b34eedbc083b3a4a322fbd937c (patch) | |
tree | 9302cfbb6469da4c249deb757b50000fe0141435 | |
parent | c011d1dc335571a1b07c64a7f3af1d97c67e2c11 (diff) | |
download | bugs-04fa4c5f8080d8b34eedbc083b3a4a322fbd937c.tar bugs-04fa4c5f8080d8b34eedbc083b3a4a322fbd937c.tar.gz bugs-04fa4c5f8080d8b34eedbc083b3a4a322fbd937c.tar.bz2 bugs-04fa4c5f8080d8b34eedbc083b3a4a322fbd937c.tar.xz bugs-04fa4c5f8080d8b34eedbc083b3a4a322fbd937c.zip |
Fixed bug 3365 -- was generating wrong statistics if there were no NEW
or no ASSIGNED bugs.
-rwxr-xr-x | collectstats.pl | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/collectstats.pl b/collectstats.pl index 6c51d1afc..e35c7aa23 100755 --- a/collectstats.pl +++ b/collectstats.pl @@ -52,21 +52,17 @@ sub collect_stats { my $product = shift; my $when = localtime (time); - my $query = "select count(bug_status) from bugs where (bug_status='NEW' or bug_status='ASSIGNED' or bug_status='REOPENED') and product='$product' group by bug_status"; $product =~ s/\//-/gs; my $file = join '/', $dir, $product; my $exists = -f $file; if (open DATA, ">>$file") { - SendSQL ($query); - - my %count; push my @row, &today; - while (my @n = FetchSQLData()) - { - push @row, @n; + foreach my $status ('NEW', 'ASSIGNED', 'REOPENED') { + SendSQL("select count(bug_status) from bugs where bug_status='$status' and product='$product'"); + push @row, FetchOneColumn(); } if (! $exists) |